Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As _
  System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
 If e.KeyCode = Keys.Enter OrElse e.KeyCode = Keys.Escape Then
    ' mach irgendetwas
    e.SuppressKeyPress = True 'fertig
 End If
End Sub