以下程序的功能是,产生10个0~1000的随机整数,放入数组Arr中,然后输出其中的最大值。请完善下列程序。 Option Base 1 Private Sub Form_Click()Dim Arr(10)As IntegerDim Max As IntegerRandomizeFor i = 1 To 10 Arr(i)= Int(Rnd * 1000)Next iMax = 【14】 For
主观题
以下程序的功能是,产生10个0~1000的随机整数,放入数组Arr中,然后输出其中的最大值。请完善下列程序。 Option Base 1 Private Sub Form_Click()Dim Arr(10)As IntegerDim Max As IntegerRandomizeFor i = 1 To 10 Arr(i)= Int(Rnd * 1000)Next iMax = 【14】 For