TextBox的DataFormat属性

Question

我想设置一个TEXTBOX的DataFormat属性，把它设为“数字”型的，如果不在属性框里面直接设置，用程序应该怎么写？

Answer 1

Text1.DataFormat.Format = "0"   '有小数的加上"0.00"

Answer 2

不知道你具体的目的是什么，如果是起到在textbox中的输入限制的目的好像不行，及时在属性里面设置也一样没有效果，你不如用TypeName函数If TypeName(text1.text)="Integer"
    msgbox "整数"
End If
If TypeName(text1.text)="Double"
    msgbox "双精度浮点数"
End If
If TypeName(text1.text)="Long"
    msgbox "长整数"
End If该函数的值对应的数据类型：
Byte 位值 
Integer 整数   
Long 长整数 
Single 单精度浮点数 
Double 双精度浮点数 
Currency 货币 
Decimal 十进制值 
Date 日期 
String 字符串 
布尔 布尔值 
Error 错误值 
Empty 未初始化 
Null 无效数据 
Object 对象 
Unknown 类型未知的对象 
Nothing 不再引用对象的对象变量

Answer 3

我是用一个TEXTBOX框做数据库的绑定，结果字段是数值型的，当把这个TEXTBOX里面写入数值型数据都不会有什么问题，但一写入数据库后，再把TEXTBOX框清空，想把字段值换为（NULL），如果不用DataFormat的话，怎么保存都不能保存进去，但设一下DataFormat ，就可以保存为(Null)

Answer 4

TEXTBOX与数据库绑定我没有用过，你试试用Clng函数将Text1.text的值转换后再存入数据库行不行。

Answer 5

为保存到数据库而设置格式？不用吧，用下面的代码：
 if text1="" then rs!字段.value=null