![[填空题] 以下程序的功能是，产生10个0～1000之间的随机整数，放入数组Arr中，然后输出其中的最大值。请填空。 Option Base 1 Private Sub Form Click()](http://www.mshxw.com/aiimages/31/254754.png "[填空题] 以下程序的功能是，产生10个0～1000之间的随机整数，放入数组Arr中，然后输出其中的最大值。请填空。 Option Base 1 Private Sub Form Click()")
[填空题] 以下程序的功能是，产生10个0～1000之间的随机整数，放入数组Arr中，然后输出其中的最大值。请填空。 Option base 1 Private Sub Form Click() Dim Arr(10) As Integer Dim Max As Integer Randomize For I = 1 To 10Arr(i) = Int (Rnd * 1000) Next iMax= ______For i = 2 To 10If______ Then Max = Arr(i)End If Next i Print Max End Sub
参考答案：
Arr(1) Arr(i) ＞ Max问题解析:
解析无
