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，用户输入时对自符进行判别，，如果不是自母就加入退格符
VB中 b$ = InputBox(hello$) b后面加$是什么意思? InputBox()中hello...
是字符串，相当于dim b as string 数据类型 !-Single -Double &-Long -Currency -String -Integer 在声明变量时可以直接用符号代替，比如 Dim i 就相当于 Dim i As Integer hello$ 这样写表示hello是一个字符串变量，使用前一般要赋值。加引号就直接表示字符串 ...
怎么显示vb msgbox 返回值
MsgBox介绍及用法等见：http:\/\/baike.baidu.com\/view\/563674.htm#2 返回值 用于MsgBox函数返回值的常量 常数值 说明 vbOK 1 确定 vbCancel 2 取消 vbAbort 3 终止 vbRetry 4 重试 vbIgnore 5 忽略 vbYes 6 是 vbNo 7 否 参考资料：<a href="http:\/\/baike.ba...
vb 一元二次方程
1、text是个控件，默认text的值是字符串形式的，如果要和数值比较，要将它转换为数值。都用val函数转换了，比较时就该用转换后的值。2、msgbox既可以做语句，也可以做函数，如果让它有“终止”、“重试”、“忽略”三个按钮，那么，要针对这三个按钮分别做一下处理。否则，不如默认它只有“确定”一...
相似回答
