[填空题] 以下程序用来产生20个(0,99)之间的随机整数,并将其中的偶数打印出来。请填空。
Private Sub Command1_Clcik()
Randomize
For I=1 To 20
X=Int(Rnd* (12) )
If X/2= (13) Then Print x
Next I
End Sub
欢迎分享,转载请注明来源:内存溢出
[填空题] 以下程序用来产生20个(0,99)之间的随机整数,并将其中的偶数打印出来。请填空。
Private Sub Command1_Clcik()
Randomize
For I=1 To 20
X=Int(Rnd* (12) )
If X/2= (13) Then Print x
Next I
End Sub
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)