vb2005 中的小问题

来源：百度知道 编辑：UC知道 时间：2024/09/25 08:22:31
我想用if语句表达这样一条语句：如果按的不是数字键或退格键，不作处理。
一楼回答的挺好，我的代码块也是这么写的，可是2005告诉我没定义keyascii变量。我该把keyascii定义成什么变量？

Select Case e.KeyChar
Case ChrW(Keys.Back)
Case ChrW(Keys.D0)
Case ChrW(Keys.D1)
Case ChrW(Keys.D2)
Case ChrW(Keys.D3)
Case ChrW(Keys.D4)
Case ChrW(Keys.D5)
Case ChrW(Keys.D6)
Case ChrW(Keys.D7)
Case ChrW(Keys.D8)
Case ChrW(Keys.D9)

Case Else
e.KeyChar = CChar("")

End Select

下面的是VB6.0的，可以参考下：
在TEXTBOX的KEYPRESS事件中加入：
If Not((KeyAscii > 47 And KeyAscii < 48) Or KeyAscii = 8) Then
'//不是数字
Else
'//是数字
End If