EnterToTAB

Sub Form_KeyPress (KeyAscii As Integer)
If KeyAscii = 13 Then
If TypeOf ActiveControl Is TextBox Then
SendKeys "{TAB}"
KeyAscii=0
End If
End If
End Sub

Impostare la propieta' KeyPreview del Form sul valore TRUE e
inserire il seguente codice nell'evento KeyPress dello
stesso Form