[填空题] 下列程序功能是，产生10个0～100的随机数，输出其中的最大值。请将程序补充完整。 Private Sub Form

[填空题] 下列程序功能是，产生10个0～100的随机数，输出其中的最大值。请将程序补充完整。

Private Sub Form_Click()

　　Dim an (10) As Integer

　　Dim max As Integer

　　Randomize

　 For i%=1 To 10

　　 an(i%)= (14)

　 Next i%

　　max=an(1)

　 For i%=2 To 10

　　　if (15) then

　　　 max=an(i%)

　　 End If

　 Next i%

　 print max

　 End Sub

End Sub

Int(Rnd*100)