填空题

设有如下程序，查找并输出该数组中的最小值，请在空白处填上合适的代码，将程序补充完整。
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 = arr1(l)’
For i=2 To 8
If arr1(i) ＜ Min Then
Next i
Print "最小值是:"; Min
End Sub