[填空题] 在窗体上画1个命令按钮,其名称为Command1,然后编写如下事件过程: PriVate Sub Commandl_CUck() Dimalt(1 To 100)As Integer
137 查阅
[填空题] 在窗体上画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,请填空。
参考答案: