怎样获取输入值的类型？一定告知谢谢

puccaguo

datatable中有一num列中，第一行的值是123456.第二行的值是abcdef。
令变量a = DataTable.Value("num", dtLocalSheet)
令变量b = VarType(a)
我希望在运行第一行时，输出b是整数型，运行第二行时，输出b是字符串型。
但是好像不行啊，运行两行b输出都是字符串型
请问有什么方法啊？

[ 本帖最后由 puccaguo 于 2008-4-18 11:29 编辑 ]

puccaguo

不能沉啊这贴

鹭岛

b = VarType(a)
这个定义本身就是个问题，传值进来的时候，你又递交给了别的值，这样肯定以字符串来了
你可以使用强制转换的形式

puccaguo

但是如果我强制转换，比如
c = cdbl(a)
那么如果a输入的时候是abcdef，这样c = cdbl(a)这句话就会报错的啊

xiaonan

我不知道你要转换类型的目的是什么啊?但是你这样强制转化肯定会 出问题.比如值是"abladas"时,你去转换成整型肯定是不可以的. 能不能把你的 真实目的说出来啊?

[ 本帖最后由 xiaonan 于 2008-4-18 15:53 编辑 ]

hsjzfling

原帖由 puccaguo 于 2008-4-18 14:57 发表
但是如果我强制转换，比如
c = cdbl(a)
那么如果a输入的时候是abcdef，这样c = cdbl(a)这句话就会报错的啊

按照你的需要，你可以这么写：
If isnumeric(a) Then
c=cdbl(a)
else
c=a
End If
msgbox vartype(c)

Suran2004

我个人觉得,123456肯定是字符串型的啊,怎么可能是整型,整型的值没那么大

puccaguo

因为有一个输入框，需要输入的是6位数字，如果输入的不是6位数字或者是字符串的话，那么在保存时系统必须要提示“需要输入6位数字”。我想用QTP做这个判断，如果输入6位数字，就保存成功，否则，需要有正确提示。
这是我的目的。

hsjzfling

原帖由 puccaguo 于 2008-4-19 09:00 发表
因为有一个输入框，需要输入的是6位数字，如果输入的不是6位数字或者是字符串的话，那么在保存时系统必须要提示“需要输入6位数字”。我想用QTP做这个判断，如果输入6位数字，就保存成功，否则，需要有正确提示。
这 ...

那不是更简单了么。。。
isnumeric函数就可以搞定了~~

hxf

“我个人觉得,123456肯定是字符串型的啊,怎么可能是整型,整型的值没那么大”.你这句话是不对的。123456在datatable中存的也是数值型的。所以，你就可以通过IsNumeric()来做判断就可以了。