n=val(inputbox("输入:"))if int(n)=n thenmsgbox"是整数"elsemsgbox"不是整数"endif
没有背语法, 大致是这样吧...public isInt (byval a as double) as boolean if int(a) = a then isInt = true end ifend function
