怎样用VB脚本判别变量的值是数字还是字符串

[ameny]

如是-0.89还是负零点八九

[zorou_fatal]

isnumeric()

[超级大笨狼]

Visual Basic Scripting Edition

IsNumeric 函数
请参阅
IsArray 函数 | IsDate 函数 | IsEmpty 函数 | IsNull 函数 | IsObject 函数 | VarType 函数
要求
版本 1
返回 Boolean 值指明表达式的值是否为数字。

IsNumeric(expression)
expression 参数可以是任意表达式。

说明
如果整个 expression 被识别为数字，IsNumeric 函数返回 True；否则函数返回 False。如果 expression 是日期表达式，IsNumeric 函数返回 False。

下面的示例利用 IsNumeric 函数决定变量是否可以作为数值：

Dim MyVar, MyCheck
MyVar = 53 '赋值。
MyCheck = IsNumeric(MyVar) ' 返回 True。
MyVar = "459.95" ' 赋值。
MyCheck = IsNumeric(MyVar) ' 返回True。
MyVar = "45 Help" ' 赋值。
MyCheck = IsNumeric(MyVar) ' 返回 False。
要求
版本 1

请参阅
IsArray 函数 | IsDate 函数 | IsEmpty 函数 | IsNull 函数 | IsObject 函数 | VarType 函数



--------------------------------------------------------------------------------

© 2001 Microsoft Corporation. 保留所有权利。

[ameny]

谢谢

[超级大笨狼]

Visual Basic Scripting Edition

VarType 函数
请参阅
IsArray 函数 | IsDate 函数 | IsEmpty 函数 | IsNull 函数 | IsNumeric 函数 | IsObject 函数 | TypeName 函数
要求
版本 1
返回指示变量子类型的值。

VarType(varname)
varname 参数可以是任何变量。

返回值
VarType 函数返回下列值：

常数 值 描述
vbEmpty 0 Empty（未初始化）
vbNull 1 Null（无有效数据）
vbInteger 2 整数
vbLong 3 长整数
vbSingle 4 单精度浮点数
vbDouble 5 双精度浮点数
vbCurrency 6 货币
vbDate 7 日期
vbString 8 字符串
vbObject 9 Automation 对象
vbError 10 错误
vbBoolean 11 Boolean
vbVariant 12 Variant（只和变量数组一起使用）
vbDataObject 13 数据访问对象
vbByte 17 字节
vbArray 8192 数组

注意 这些常数是由 VBScript 指定的。所以，这些名称可在代码中随处使用，以代替实际值。
说明
VarType 函数从不通过自己返回 Array 的值。它总是要添加一些其他值来指示一个具体类型的数组。当 Variant 的值被添加到 Array 的值中以表明 VarType 函数的参数是一个数组时，它才被返回。例如，对一个整数数组的返回值是 2 + 8192 的计算结果，或 8194。如果一个对象有默认属性，则 VarType(object) 返回对象默认属性的类型。

下面函数利用 VarType 函数决定变量的子类型.

Dim MyCheck
MyCheck = VarType(300) ' 返回 2。
MyCheck = VarType(#10/19/62#) ' 返回 7。
MyCheck = VarType("VBScript") ' 返回 8。
要求
版本 1

请参阅
IsArray 函数 | IsDate 函数 | IsEmpty 函数 | IsNull 函数 | IsNumeric 函数 | IsObject 函数 | TypeName 函数



--------------------------------------------------------------------------------

© 2001 Microsoft Corporation. 保留所有权利。