UC知道vb.net2008中检查输入的字符是否存在于指定字符列表中
来源：百度知道 编辑：UC知道 时间：2024/05/23 10:36:57
我用vb.net2008设计一个程序，在文本框中输入过程中检查是否在指定的字符组内。我指定的字符是1,2,3,4,5,6,7,8,9,0,.，A，B，C。请高手指教。
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox2.KeyPress
Dim KeyAscii As Integer
KeyAscii = AscW(UCase(e.KeyChar))
if KeyAscii=65 Then
SendKeys.Send("A")
Elseif KeyAscii=64 Then
SendKeys.Send("B")
Elseif KeyAscii=65 Then
SendKeys.Send("C")
ElseIf KeyAscii < 48 Or KeyAscii > 57 Then
e.KeyChar = vbNullString
End If
end sub
用正则表达式不就搞定了,何必那么麻烦