VB输入框只允许输入数字

前端之家收集整理的这篇文章主要介绍了VB输入框只允许输入数字前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
Private Sub txSN_KeyPress(KeyAscii As Integer)
Const xStr As String = "0123456789"
KeyAscii = IIf(InStr(xStr & Chr(8),Chr(KeyAscii)),KeyAscii,0)
End Sub

猜你在找的VB相关文章