COMO TROCAR O TAB PELO ENTER???

USUARIO.EXCLUIDOS 28/11/2004 15:46:44
#52386 Resposta escolhida

Vou te dar uma sugestão use uma função de verificação , assim você poderá otimizar seu código .
é uma boa maneira de se permitir apenas números ou maiúsculas ou minúscuilas ou restringir caracteres especiais .
Para descobrir os códigos KeyAscii de cada tecla pressionada e os códigos KeyCode de cada tecla abaixada ( KeyDown ) sugiro utilizar aplicativozinho KEYTESTER que eu postei aí mesmo no site .
http://www.vbmania.com.br/vbmdetail.php?varID=1868

Exemplo :

Text1_KeyPress ( KeyAscii as integer )
KeyAscii = VerTecla ( KeyAscii )
End Sub

Text2_KeyPress ( KeyAscii as integer )
KeyAscii = VerTecla ( KeyAscii )
End Sub

Private Function VerTecla ( ByVal Tecla as integer )
if Tecla = 13 then
SendKeys "{TAB}"
VerTecla = 0
Else
VerTecla = Tecla
End If
End Function