![[填空题] 下列程序功能是，产生10个0～100的随机数，输出其中的最大值。请将程序补充完整。 Private Sub Form_Click() Dim an(10)As Integer Dim ma](http://www.mshxw.com/aiimages/31/255118.png "[填空题] 下列程序功能是，产生10个0～100的随机数，输出其中的最大值。请将程序补充完整。 Private Sub Form_Click() Dim an(10)As Integer Dim ma")
[填空题] 下列程序功能是，产生10个0～100的随机数，输出其中的最大值。请将程序补充完整。 Private Sub Form_Click() Dim an(10)As Integer Dim max As Integer Randomize For i %=1 To 10 an(i%)=______ Next max=an(1) For i%=2 to 10 ifan(i%)＞max then max=an(i%) End If Next Print max End Sub
参考答案：
Int(Rnd*1000)问题解析:
Rnd(x)产生一个0～1之间的单精度随机数。
