Question

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

如：在text1.text里输入一个数，如果是整数，就让text1.text=空("")
vb怎么写啊

Answer 1

方法有多种，看你要怎么用了。
一、判断是否为数字且是否包含小数点：
IsNumeric(Text1) And InStr(1, Text1, ".", vbTextCompare)=0
二、计算：
Int(Val(Text1)) = Text1
三、正则表达式：
[0-9]{1,}

Answer 2

if x=int(x) then print x;"is a integer." else print x;"isn't a integer."
或者
input x
if x-int(x)>0 then print x;"isn't a integer." else print x;"is a integer."

Answer 3

一、判断是否为数字且是否包含小数点:
IsNumeric(Text1) And InStr(1, Text1, ".", vbTextCompare)=0
二、计算:
Int(Val(Text1)) = Text1
三、正则表达式:
[0-9]{1,}

Answer 4

没有小数点的数是整数

Answer 5

if isnumeric(text1.text) then
text1.text=""
end if