设有下列程序，查找并输出该数组中的最小值，请在空白处填上合适

问题填空题

设有下列程序，查找并输出该数组中的最小值，请在空白处填上合适的代码，将程序补充完整。
Option Base 1
Private Sub Command1Click()
Dim arrl
Dim Min As Integer,i As Integer
arrl=Array(12,435,76,-24,78,54,866,43)
Min=arrl(1)
For i=2 To 8
If arrl(i)＜Min Then______
Nexti
Print"最小值是:":Min
End Sub

答案

参考答案：Min=arrl(i)

解析：题目要求输出数组中的最小值，分析程序可知，本程序求数组最小值的算法是：假设最小的值是第一个数组元素，并把它存在Min变量中，然后从数组的第二个元素开始逐个与Min变量对比，如果有比Min更小的数，赋值给Min，这样对比到数鲴最后一个元素时，就能找到最小的元素，且它存储在Min变量中，因此最后只要输出Min变量值即可。