VB高手们：如何确保输入inputbox函数的只能是数字？
我作用的是VB6.0版本！1、如何确保用户输入的只能是数字？（如果输入非法字符就提示用户重新输入！）2、如果对方在inputbox函数框为空的时候单击确定后，提示用户没有...
我作用的是VB6.0版本！
1、如何确保用户输入的只能是数字？（如果输入非法字符就提示用户重新输入！）
2、如果对方在inputbox函数框为空的时候单击确定后，提示用户没有输入任何数据！
急！请快回答！ 展开
1、如何确保用户输入的只能是数字？（如果输入非法字符就提示用户重新输入！）
2、如果对方在inputbox函数框为空的时候单击确定后，提示用户没有输入任何数据！
急！请快回答！ 展开
2个回答
展开全部
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
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
我不懂VB，但是我给你个建意，，就是在INPUTBOX上加一个LISTENER，用户输入时对自符进行判别，，如果不是自母就加入退格符
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
