Miguel R. Gimeno
15 de Noviembre del 2003

Necesito saber que APIS de windows necesito para que todo el programa generado en VB se mueba de campo a campo y de linea en linea con la tecla intro y no con el tab que me da ahora. ej. pongo codigo del articulo y tengo que pulsar tab para el siguiente campo y me gustaria que fuera con INTRO. gracias

Baltasar
15 de Noviembre del 2003

No necesitas de APIs para hacer eso. Te pongo un ejemplo con tres TextBox y un button:

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyReturn, vbKeyDown
Text2.SetFocus
End Select
End Sub

Private Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyUp
Text1.SetFocus
Case vbKeyReturn, vbKeyDown
Text3.SetFocus
End Select
End Sub

Private Sub Text3_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyUp
Text2.SetFocus
Case vbKeyReturn, vbKeyDown
Command1.SetFocus
End Select
End Sub

Cuando pulsas intro o flecha abajo, pasas de un textbox al siguiente, o al commandbutton si es el último textbox; y si pulsas flecha arriba "subes" al textbox anterior.

He incluido lo de flecha arriba y flecha abajo porque me resulta más interesante, creo que es más cómodo trabajar así, pero es cuestión de gustos.

Saludos

JoelSeverich
15 de Noviembre del 2003

no necesitas la API de windows para hacer eso, si utilizas la propiedad KeyPress o KeyDown de los controles, puedes hacer lo que necesitas
ej.

Text1_KeyPress (KeyAscii a integer )

if keyascii= 13 (Enter) then

keyascii=27 (Escape)

endif

con esta idea puedes hacer exactamente lo que necesitas