Private Sub TextBox1_PreviewKeyDown(sender As Object, e As PreviewKeyDownEventArgs) Handles TextBox1.PreviewKeyDown If e.KeyCode = Keys.Enter Then ' faccio altro End If End Sub