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
 

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

Preguntas similares