有没有比较好的办法，判断一个字符串的内容是Integer类型，而不是Float类型？

Question

用IsNumeric只能判断是不是数值型的

Answer 1

可以用instr试试:
dim a as string
a="123.5"
if instr(a,".")<>0 then
 '是Float型
else
 '不是
endif

Answer 2

dim a as string 
a="1000.0"if(int(a)<a) then
'no
else
'yes 
end if

Answer 3

用vartype()函数
     返回一个 Integer，指出变量的子类型。语法VarType(varname)必要的 varname 参数是一个 Variant，包含用户定义类型变量之外的任何变量。返回值常数 值 描述 
vbEmpty 0 Empty（未初始化） 
vbNull 1 Null（无有效数据） 
vbInteger 2 整数 
vbLong 3 长整数 
vbSingle 4 单精度浮点数 
vbDouble 5 双精度浮点数 
vbCurrency 6 货币值 
vbDate 7 日期 
vbString 8 字符串 
vbObject 9 对象 
vbError 10 错误值 
vbBoolean 11 布尔值 
vbVariant 12 Variant（只与变体中的数组一起使用） 
vbDataObject 13 数据访问对象 
vbDecimal 14 十进制值 
vbByte 17 位值 
vbUserDefinedType 36 包含用户定义类型的变量 
vbArray 8192 数组