当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 以下程序的功能是,产生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 = A

  

参考答案:

Arr(1)Arr(i)>Max

  参考解析

微信端