Question

大学vb怎么判断输入的是整数

Answer 1

一、判断是否为数字且是否包含小数点：
IsNumeric(Text1) And InStr(1, Text1, ".", vbTextCompare)=0
二、计算：
Int(Val(Text1)) = Text1

Answer 2

方法1、
Dim X As Integer
X = Val(Text1.Text)
If X <> Val(Text1.Text) Then
MsgBox "不是整数"
Else
MsgBox "是整数"
End If
'方法2
If IsNumeric(Text1.Text) = True And InStr(1, Text1.Text, ".", 1) = 0 Then
MsgBox "是整数"
Else
MsgBox "不是整数"
End If
'方法3
If Int(Text1.Text) = Val(Text1.Text) Then
MsgBox "是整数"
Else
MsgBox "不是整数"
End If

还有许多方法，判断输入的是整数，VB是非常灵活的。

Answer 3

if cint（x）=x then