[سالم العنزي]

كود :

 'توضع في مربع TextBox في حدث (KeyDown)
Private SubTextBox1_KeyDown(sender As Object, e As KeyEventArgs) Handles TextBox1.KeyDown
       'الانتقال الي زر Button1
       If e.KeyCode = Keys.Enter Then
           Button1.PerformClick()
       End If
   End Sub