设有如下程序: 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个元素的数组,然后查找并输出该数组中各元素的最小值。请填空。