VB高手们：如何确保输入inputbox函数的只能是数字？
我作用的是VB6.0版本！
1、如何确保用户输入的只能是数字？（如果输入非法字符就提示用户重新输入！）
2、如果对方在inputbox函数框为空的时候单击确定后，提示用户没有输入任何数据！
急！请快回答！
100
T1=inputbox("请输入：")
If T1 = "" Then MsgBox "还没输入！": goto 100
If Not IsNumeric(T1) Then MsgBox "请输入数字！": goto 100
T1=inputbox("请输入：")
If T1 = "" Then MsgBox "还没输入！": goto 100
If Not IsNumeric(T1) Then MsgBox "请输入数字！": goto 100
温馨提示：内容为网友见解，仅供参考
第1个回答 2008-06-08
我不懂VB，但是我给你个建意，，就是在INPUTBOX上加一个LISTENER，用户输入时对自符进行判别，，如果不是自母就加入退格符
相似回答
