Originariamente inviato da pedro8a
L'evento dovrebbe essere l'invio, Keyascii=13
Scusami, l'evento dovrebbe essere il keypress:

Private Sub TuaTextBox_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 _ 'tasto invio
Then
'tuo codice
end if
End sub