锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net取偶数 vbnet取整

IT技术偶数

VB.NET经典问题(1)这个问题看似简单vb.net取偶数，实际上包含vb.net取偶数了三个问题：
1. 5/2 vb.net取偶数的结果是 Double 类型
2. dim aa as Integer = 5/2 将 Double 类型隐式转换为 Integer 类型
3. 转换过程将小数部分 Banker 舍入
因为你这两个算式小数部分都是0.5 ， 所以取最近的偶数 aa = 2，bb = 4
用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
vb.net怎么同时判定多个数的奇偶性这个同时判定可以采用多线程做 。但是一般都是使用数组循环来统计 。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim A(100) As Integer
Dim n1 As Integer = 0
Dim n2 As Integer = 0
For i = 1 To 100
Randomize()
A(i) = Int(Rnd() * 10001)
If A(i) Mod 2 = 0 Then
n1= 1
Else
n2= 1
End If
Next
MsgBox("所产生的100个数字中偶数有"n1"个 ， 奇数有"n2"个")
End Sub
【vb.net取偶数 vbnet取整】vb.net取偶数的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbnet取整、vb.net取偶数的信息别忘了在本站进行查找喔 。

    推荐阅读


    上一篇：如何连接263邮箱服务器？ 263邮箱服务器怎么连接

    下一篇：计算机毕业设计答辩什么问，毕业答辩计算机专业问什么