none
ENTER in Textbox abfragen RRS feed

  • Frage



  • Private Sub TextBox2_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) If Asc(e.KeyChar) = 13 Then TextBox1.AppendText(TextBox2.Text & vbCrLf) TextBox2.Text = "" End If End Sub

    Hoi FreuNde,

    wie es so ist wenn man erstmal zugange ist ;-)
    Ich möchte in einer TextBox (ein Eingabefeld) die ENTER-Taste abfragen.

    Habe bisher obigen Code, der aber nicht funktioniert.

    Wer weiss woran es liegen kann ?

    Doei
    Franz

    Sonntag, 27. September 2009 21:13

Antworten

  • Hi Franz,
    nutze das KeyDown-Ereignis und frage dort nach Keys.Enter, z.B. so:

      Private Sub tb_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles tb.KeyDown
        If e.KeyCode = Keys.Enter Then
          Call MachwasBeiEnter()
        End If
      End Sub
    --
    Peter
    Montag, 28. September 2009 08:05