0

TextBoxでリターンヒット(入力)をキャッチするには?

以下は動作しません。「KeyPress イベントが見つかりません」というエラーが表示され続けます。

Private Sub TextBox_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox.KeyPress
        If TextBox.Text Is Nothing Then Return
        If TextBox.Text.Length = 6 And Asc(e.KeyChar) = 13 Then
            ' Do something here
        End If

End Sub
4

3 に答える 3

2

テキストボックスを削除してコードを再入力してみてください

If TextBox.Text Is Nothing Then Return
    If TextBox.Text.Length = 6 And Asc(e.KeyChar) = 13 Then
        ' Do something here
    End If

それはうまくいくはずです-テキストボックス名またはキープレス宣言コードに何か問題がある可能性があります。

そのコードを新しいテキスト ボックスで確認したところ、問題なく動作しました。

于 2012-06-13T08:31:58.993 に答える
0

次のコードは機能します。

Private Sub TextBox_KeyPress(ByVal KeyAscii As Integer)

        If TextBox.Text Is Nothing Then Return
        If TextBox.Text.Length = 6 And KeyAscii = 13 Then
            ' Do something here
        End If

End Sub
于 2012-06-13T08:42:43.427 に答える
0
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
    If e.KeyChar = Convert.ToChar(13) Then
        If TextBox1.Text.Trim <> Nothing Then
            'Do Something here
        End If
    End If
于 2016-03-29T04:36:33.873 に答える