if isnumeric(text1.text) then
....
else
msgbox "请输入数值型数据!",48,"出错"
endif
....
else
msgbox "请输入数值型数据!",48,"出错"
endif
解决方案 »
- vs2010 vb 不同form之间函数调用的问题
- 哪里有女声的中文tts语音库啊 ????急!
- vb中call语句是干什么用的
- 送分100分:关于ARIAL汉字显示方框的问题
- 问题:想打开用户选择的任意文件(*.doc,*.jpg....),并且直到打开的程序关闭后在继续执行。请高手指教。
- 有没有这样的控件!
- 怪事:怎么一运行程序就自动把“拨号连接”给调出来了?
- 怎么样合并byte数组?大家请看看这段代码
- 一个简单的问题:请问如何使程序运行期间屏幕非程序区一直变黑?(无论程序区变成多大)
- 给 setmenothing(无名) 加 6 分
- 为何数据库会出现数据库格式不可识别的错误,100分
- vb菜单编辑器的问题,请教
直接用系统会自动转换,也可以显式转换CDbl(text1.text)