用什么办法测试一个变量的类型?

[thg]

多谢指点!

[sx1123]

varType()
TypeOf()

[thg]

Typeof()不能用啊。
vartype()得出来的结果是一个数字，具体是什么样的含义呢？

[cloudchen]

typename()

[sx1123]

你用已知的试一下
比如数组：
dim arr(3)
vartype(arr)

[Iamfish]

varType

仅当类型库包含以下常数定义，且在您的工程文件中已经显式引用该类型库后，才允许使用这些常数。对于 VBScript，必须在代码中显式声明这些常数。

常数 值 描述
vbEmpty 0 未初始化（默认）
vbNull 1 不包含任何有效数据
vbInteger 2 整型子类型
vbLong 3 长整型子类型
vbSingle 4 单精度子类型
vbDouble 5 双精度子类型
vbCurrency 6 货币子类型
vbDate 7 日期子类型
vbString 8 字符串子类型
vbObject 9 对象
vbError 10 错误子类型
vbBoolean 11 Boolean 子类型
vbVariant 12 Variant （仅用于变量数组）
vbDataObject 13 数据访问对象
vbDecimal 14 十进制子类型
vbByte 17 字节子类型
vbArray 8192 数组

[Iamfish]

VarType 函数 语言参考
版本 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。

楼主啊，写ASP怎么可以没有VBS的手册啊？
到这里下载一个吧：
http://www.gbnis.com/down_software.asp?id=28
http://www.gbnis.com/download.asp?type_id=1¤tpage=1

[thg]

谢谢各位！