vb.net判断整数,vb判断数字

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

方法有多种，看你要怎么用了。

一、判断是否为数字且是否包含小数点：

IsNumeric(Text1) And InStr(1, Text1, ".", vbTextCompare)=0

二、计算：

Int(Val(Text1)) = Text1

三、正则表达式：

[0-9]{1,}

相关问答

Q1: 关于VB.net取整的问题

double是双精度 有效数值位52位 表示成指数的形式 即指数11位 即表示成

所以180.89305用2进制表示是10110100.1110010010011110111011001011111110110001010110110101

即

180.89305在double中存在的实际数值是

1.01101001110010010011110111011001011111110110001010110110101 *2^7

取小数点后 52位有效值后 等于10进制的180.893049999999998

所及加最后变成了 1808930.99999999998

第一次当然输出近似值1808931

第二次int函数去掉了小数点后的数int就是只取整数的部位的不是四舍五入 所以少了1

Q2: 用VB.NET编程，任意输入一个整数，判定该整数的奇偶性

Private Sub Command1_Click()

Dim i As Integer

i = Text1.Text

If i Mod 2 = 0 Then

MsgBox "偶数"

Else

MsgBox "奇数"

End If

End Sub