![](https://lstatic.shangxueba.com/sxbzda/h5/images/m_q_title.png)
![](https://lstatic.shangxueba.com/sxbzda/pc/images/home_logo.png)
![设有如下程序: OptionBase1PrivateSubCommand1_Click() Dimarr1 DimMinAsInteger,iAsInt](https://img2.soutiyun.com/shangxueba/askcard/2023-10/1/564/20231001085702726.jpg)
[主观题]
设有如下程序: OptionBase1PrivateSubCommand1_Click() Dimarr1 DimMinAsInteger,iAsInt
设有如下程序:
Option Base 1
Private Sub Command1_Click()
Dim arr1
Dim Min As Integer, i As Integer
arr1 = Array(12, 435, 76, -24, 78, 54, 866, 43)
Min = ______
For i = 2 To 8
If arr1(i) < Min Then______
Next
Print "最小值是:"; Min
End Sub
以上程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找并输出该数组中各元素的最小值。请填空。
![](https://lstatic.shangxueba.com/sxbzda/h5/images/tips_org.png)