题目内容：
在窗体上画1个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click（）
Dim arr（1 To 100）As Integer
For i=1 To 100
arr（i）=Int（Rnd*1000）
Next i
Max=arr（1）
Min=arr（1）
For i=1 To 100
If________Then
Max=arr（i）
End If
If________Then
Min=arr（i）
End If
Next i
Print"Max="；Max，"Min="；Min
End Sub
程序运行后，单击命令按钮，将产生100个1000以内的随机整数，放入数组arr中，然后查找并输出这100个数中的最大值Max和最小值Min，请填空。
参考答案：