在窗体上画1个命令按钮,其名称为Command1,然后编写如下事件过程: PriVate Sub
Commandl_CUck() Dimalt(1 To 100)As Integer
Fori=1 To 100
arr(i)=Int(Rnd*1000) Nexti
Max=arr(1) Min=arr(1) Fori=1
To 100 If [12] Then
Max=arr(i) End
If If [13] Then
Min=arr(i) End
If Nexti
Print"Max=";Max,"Min=";Min End Sub
程序运行后,单击命令按钮,将产生100个1000以内的随机整数,放入数组alt中,然后查找并输出这100个数中的最大值Max和最小值Min,请填空。