Visual Basic Avanzado - SendKeys "{tab}" no andó..

Por favor, alguien sabe si el código es correcto en VB6 para emular la tecla Tab, presionando la tecla enter.

Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then KeyAscii = 0 ' Para que no "pite" SendKeys "{tab}" ' Envía una pulsación TAB End If End Sub
Muchas gracias.

Sebas
Acabo de probar el código brindado por ti y me funciona a la perfección...
Si pudieras comentar algo más...
Saludos,

Gonzalo

Si yo lo veo correcto y tambien lo utilzo asi aca un ejemplo:


Private Sub txtColor_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
SendKeys "{tab}"
KeyAscii = 0
End If
End Sub

Bueno, tu pregunta es que si alguien sabe si el código es correcto, a lo que te respondo que yo sí sé que es correcto, pues lo utilizo en mis programas.
¿Qué problema tienes o qué sucede en tu código?
Por cierto. "andó" ¿de qué verbo es esa conjugación? Muchos no lo saben, no lo creen, no lo implementan o no les importa, pero la ortografía y la programación no están reñidas.

El código es correcto.
Si usas Windows 7 olvídate que funcione bien, a veces va y otras no. ¿Por qué?, bueno creo que no lo sabe nadie...

Ten en cuenta en tu programa el número que tengas en la propiedad TabIndex de los objetos de tu formulario, si no es correlativo, puede que tengas ahí el problema. A un que veo que no usas matrices de objetos para tu objeto llamado "Text1", en tal caso podrías llamar a la rutina .SetFocus que suele tener todos los objetos que puedan tener foco, claro.

Un saludo, Lander.

Revisa las propiedades del formulario "KeyPreview=True" si esta en False no se ejecutara el sub.

Saludos!!