2

VB.NET/ Visual Studio 2008でスペースキーとバックスペースキーを許可するにはどうすればよいですか?

サンプルコード:

Private Sub txtname_KeyPress(ByVal sender As System.Object, _
                             ByVal e As System.Windows.Forms.KeyPressEventArgs) _
                             Handles txtname.KeyPress

    If e.KeyChar < "A" Or e.KeyChar > "z" And e.KeyChar <> ControlChars.Back Then
        e.Handled = True
        txtname.Clear()
    Else
    End If
End Sub
4

2 に答える 2

5

Backspace の場合はAscFunction を使用し、Hex Valueをテストします。この場合は 8 で、スペースをテストできます。" "

If Asc(e.KeyChar) = 8 OrElse e.KeyChar = " " OrElse e.KeyChar < "A" OrElse e.KeyChar > "z" Then
    e.Handled = True
    CType(sender, TextBox).Clear()
End If

あなたの質問が BackSpace と Space をチェックする方法である場合、上記の答えはうまくいきます。それらをテキストと一緒に許可するには、次のようにします

If Not ((Asc(e.KeyChar) = 8 OrElse e.KeyChar = " ") OrElse (e.KeyChar >= "A" AndAlso e.KeyChar <= "z")) Then
    e.Handled = True
    CType(sender, TextBox).Clear()
End If
于 2012-10-10T07:12:03.807 に答える