[主观题]

在窗体上画1个命令按钮,其名称为Command1,然后编写如下事件过程:

Private Sub Command1_Click()

D.im arr(1 To 100)As Integer

F.or i=1 To 100

arr(i)=Int(Rnd*1000)

Next i

Max=arr(1)

Min=arr(1)

F.or i=1 To 100

If________Then

Max=arr(i)

E.nd If

If________Then

Min=arr(i)

E.nd If

Next i

Print"Max=";Max,"Min=";Min

E.nd Sub

程序运行后,单击命令按钮,将产生100个1000以内的随机整数,放入数组arr中,然后查找并输出这100个数中的最大值Max和最小值Min,请填空。

参考答案与解析: