vb的KeyAscii
PrivateSubText2_KeyPress(KeyAsciiAsInteger)'禁止输入非数字字符IfKeyAscii<48OrKeyAscii>57ThenKe...
Private Sub Text2_KeyPress(KeyAscii As Integer)
'禁止输入非数字字符
If KeyAscii < 48 Or KeyAscii > 57 Then
KeyAscii = 0
End IfEnd Sub我想要如果KeyAscii=8时，不会被变成KeyAscii = 0，请问怎么办？ 展开
'禁止输入非数字字符
If KeyAscii < 48 Or KeyAscii > 57 Then
KeyAscii = 0
End IfEnd Sub我想要如果KeyAscii=8时，不会被变成KeyAscii = 0，请问怎么办？ 展开
展开全部
Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii <> 8 And (KeyAscii < 48 Or KeyAscii > 57) Then KeyAscii = 0'为了逻辑明了 可以加个括号 End Sub
If KeyAscii <> 8 And (KeyAscii < 48 Or KeyAscii > 57) Then KeyAscii = 0'为了逻辑明了 可以加个括号 End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
TableDI
2024-07-18 广告
Excel一键自动匹配,在线免费vlookup工具,3步完成!Excel在线免费vlookup工具,点击4步自动完成vlookup匹配,无需手写公式,免费使用!...
点击进入详情页
本回答由TableDI提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
