vb怎样判断一个数是否是整数？

if VarType(ynum) = vbInteger or VarType(ynum) = vbLong then msgbox cstr(ynum) & "是一个数字"
从某种意义上来说，如果返回值为vbBoolean或vbByte也是整数。

这个很简单，首先判断是否是整数，然后采用循环语句进行统计，判断是否整数，这里有一个小窍门，就是截取小数部分，然后和一个接近1的数，比如“0999999”比较，大于此数就为整数，这是因为计算机由于浮点计算时，常把整数表示成“9999999999999999999999999999999”，9的数量取决于数据类型

---