vb代码,急 a) 单击“生成”按钮,生成100个三位随机整数,分别将其中的偶数与奇数显示在二个列表

发布时间：2021-03-12 13:27:33

vb代码,急 a) 单击“生成”按钮,生成100个三位随机整数,分别将其中的偶数与奇数显示在二个列表框中 b)

网友回答

生成按钮代码：
Private Sub Command1_Click()
Randomize
For i = 1 To 100
t = Int(Rnd() * 900 + 100)
If t Mod 2 = 0 Then
List1.AddItem t
Else List2.AddItem t
End IfNext iEnd Sub
我已近法测试过了.
以上问题属网友观点，不代表本站立场，仅供参考！