dim db_value as doubleif isnumeric(text1.text) then
db_value = cdbl(text1.text)
nd if
db_value = cdbl(text1.text)
nd if
解决方案 »
- 怎么设置VB6的调试输出目录
- ASP.NET(VB)添加数据问题?
- OperationBuffer = Chr("&H" & CodeLength)提示“type mismatch”
- 着急,在线等~为什么我自定义控件编译和引用都没有问题,但是一画在窗体上就弹出一个空白的错误msgbox?
- 谁有这本书的例子?<<Visual Basic数据库系统开发案例精选>>我500分相送!!!
- 从Byte()载入一幅Jpg图像,怎样最快?
- 关于word书签的问题,急急急!!!
- 各位大哥,我已经晕了,字符串截取函数是啥呀????
- 我想作一个好像acdsee那种缩略图列表,不知道应该用什么控件那?
- 请问两个进程间怎么进行数据交换
- VB6在打sp5的补丁后,编译ado数据控件的complete或willchange等事件子程序时出现错误,怎样解决?急!
- 如何读出以下此文件的内容,使其保存到一个access数据库中:
字符型转换为 Single:CSng();
字符型转换为 Byte :CByte();
字符型转换为 Date :CDate();
大概就这几种字符型转数值型的转换,希望对你有用。