Private Sub TextBox1_KeyPress(ByVal sender As System.Object, ByVal e As _
  System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        If e.KeyChar = 13 Then
            methode()
        End If
    End Sub