vb 随机产生十个10-50之间的整数并打印!怎么做?
展开全部
Private Sub Command1_Click()
Dim i As Integer
Dim A(10) As Integer
Randomize '产生随机种子值
For i = 0 To 9
A(i) = Int(Rnd * 40) + 10 '产生随机数
Form1.Print A(i)
Next i
End Sub
经过测试的了……
Dim i As Integer
Dim A(10) As Integer
Randomize '产生随机种子值
For i = 0 To 9
A(i) = Int(Rnd * 40) + 10 '产生随机数
Form1.Print A(i)
Next i
End Sub
经过测试的了……
参考资料: 无
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询