假如i 是未知的类型,然后小弟我IF如果i是整型就运行下面。 如何写判断if那里 怎么将i判断是否为整形

假如i 是未知的类型,然后我IF如果i是整型就运行下面。 怎么写判断if那里 如何将i判断是否为整形
假如i 是未知的类型,然后我IF如果i是整型就运行下面。
  怎么写判断if那里
如何将i判断是否为整形
 
'--------------------
我用来十进制转换二进制的,

------解决方案--------------------
if vartype(x)=vbInteger then
'执行内容
end if
------解决方案--------------------
如果 i 不是 Variant,那么 i 是什么类型,数据就是什么类型。VB 在变量赋值时会自动换转类型。

如果 i 是 Variant 类型,则可以通过 VarType(i) 取得其类型:

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     数组