问题
填空题
以下程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找并输出该数组中各元素的最小值。请填空。
Option Base 1
Private Sub Commandl_Click()
Dimarrl
DimMin As Integer,i As Integer
arrl=Array(12,435,76,-24,78,54,866,43)
Min= [11]
Fori=2 To 8
If arrl(i)<Min Then [12]
Nexti
Print"最小值是:";Min
End Sub
答案
参考答案:Min=arrl(i)