Para a tecla Enter ter a mesma função da tecla Tab, basta utilizar a função abaixo no KeyPress de sua TextBox.

Private Sub txt1_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
        SendKeys “{TAB}”
    End If
End Sub

vlw

About these ads