e.KeyChar

02/08/2006 - 08:35 por Hernan | Informe spam
Amigos, estoy realizando un formulario de carga de datos, y para facilitar y
hacer mas veloz la carga, ademas de pasar entre los textbox con el TAB
configure cada textbox con el siguiente procedimiento para que cuando se
presiones ENTER pase al siguiente textbox que le sigue en el orden.
Mi pregunta puntual es: hay alguna mas simple de hacer esto???????, ya que
debo hacer esto para cada textbox.
Gracias

El evento que tengo para pasar con el enter es:

Private Sub ApellidosTextBox_KeyPress(ByVal sender As Object, ByVal Tecla As
System.Windows.Forms.KeyPressEventArgs) Handles ComboDireccion.KeyPress

If Tecla.KeyChar = ChrW(Keys.Enter) Then
NombresTextBox.Focus = True
End If
End Sub

Muchas Gracias

Preguntas similare

Leer las respuestas

#1 Luis Miguel Blanco
02/08/2006 - 11:03 | Informe spam
Hola Hernan

Prueba a poner la propiedad KeyPreview del formulario a True, y en uno de
los eventos de captura de teclado del formulario, utiliza el objeto SendKeys
para enviar una pulsación de Tab pero cuando el usuario pulse Enter. De esta
forma sólo tendrás que escribir un único evento.

En el siguiente ejemplo se utiliza el evento KeyDown del formulario:

'//////////////////////////
Private Sub Form2_KeyDown(ByVal sender As Object, ByVal e As
System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
If e.KeyCode = Keys.Enter Then
SendKeys.Send("{TAB}")
End If
End Sub
'//////////////////////////

Espero que te sirva esta solución.
Un saludo
Luis Miguel Blanco
http://www.dotnetmania.com


"Hernan" wrote:

Amigos, estoy realizando un formulario de carga de datos, y para facilitar y
hacer mas veloz la carga, ademas de pasar entre los textbox con el TAB
configure cada textbox con el siguiente procedimiento para que cuando se
presiones ENTER pase al siguiente textbox que le sigue en el orden.
Mi pregunta puntual es: hay alguna mas simple de hacer esto???????, ya que
debo hacer esto para cada textbox.
Gracias

El evento que tengo para pasar con el enter es:

Private Sub ApellidosTextBox_KeyPress(ByVal sender As Object, ByVal Tecla As
System.Windows.Forms.KeyPressEventArgs) Handles ComboDireccion.KeyPress

If Tecla.KeyChar = ChrW(Keys.Enter) Then
NombresTextBox.Focus = True
End If
End Sub

Muchas Gracias
Respuesta Responder a este mensaje
#2 Oscar Cedillo
05/08/2006 - 22:47 | Informe spam
Lo que te recomiendo es que te crees un control de usuario y soobre escribas
el evento KeyPress por ejemplo


Protected Overrides Sub OnKeyPress(ByVal e As
System.Windows.Forms.KeyPressEventArgs)
MyBase.OnKeyPress(e)
If e.KeyCode = Keys.Enter Then
SendKeys.Send("{TAB}")
End If
End Sub

luego complias el proyecto y adicionas la dll q se crea en la barra de
herramientas
y listo tienes otro textbox pero la diferencia q este responde a la
pulsacion de la tecla enter y te envia al siguiente control
La imaginacion es mas importante que el conocimiento


"Luis Miguel Blanco" wrote:

Hola Hernan

Prueba a poner la propiedad KeyPreview del formulario a True, y en uno de
los eventos de captura de teclado del formulario, utiliza el objeto SendKeys
para enviar una pulsación de Tab pero cuando el usuario pulse Enter. De esta
forma sólo tendrás que escribir un único evento.

En el siguiente ejemplo se utiliza el evento KeyDown del formulario:

'//////////////////////////
Private Sub Form2_KeyDown(ByVal sender As Object, ByVal e As
System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
If e.KeyCode = Keys.Enter Then
SendKeys.Send("{TAB}")
End If
End Sub
'//////////////////////////

Espero que te sirva esta solución.
Un saludo
Luis Miguel Blanco
http://www.dotnetmania.com


"Hernan" wrote:

> Amigos, estoy realizando un formulario de carga de datos, y para facilitar y
> hacer mas veloz la carga, ademas de pasar entre los textbox con el TAB
> configure cada textbox con el siguiente procedimiento para que cuando se
> presiones ENTER pase al siguiente textbox que le sigue en el orden.
> Mi pregunta puntual es: hay alguna mas simple de hacer esto???????, ya que
> debo hacer esto para cada textbox.
> Gracias
>
> El evento que tengo para pasar con el enter es:
>
> Private Sub ApellidosTextBox_KeyPress(ByVal sender As Object, ByVal Tecla As
> System.Windows.Forms.KeyPressEventArgs) Handles ComboDireccion.KeyPress
>
> If Tecla.KeyChar = ChrW(Keys.Enter) Then
> NombresTextBox.Focus = True
> End If
> End Sub
>
> Muchas Gracias
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida