文字の検証時にバックスペースとスペースを許可する方法は？

Question

私が使用していたコードはこれです：

If Asc(e.KeyChar) < 65 Or Asc(e.KeyChar) < 90 _ 
And Asc(e.KeyChar) < 97 Or Asc(e.KeyChar) > 122 Then 
    MessageBox.Show("Please enter letters only") 
    e.Handled = True 
End If 

VBの文字を検証するときにバックスペースやスペースを許可する方法は？バックスペース用

Answer 1

文字コードは8で、スペースのための32であるので、あなたのコードは次のようになります。私は最初Falseに遭遇したときの評価を停止するために、AndAlsoを使用

If (Asc(e.KeyChar) < 65 OrElse Asc(e.KeyChar) < 90) _ 
AndAlso (Asc(e.KeyChar) < 97 OrElse Asc(e.KeyChar) > 122) _ 
AndAlso Asc(e.KeyChar) <> 8 AndAlso Asc(e.KeyChar) <> 32 Then 
    MessageBox.Show("Please enter letters only") 
    e.Handled = True 
End If 

注意。