提高碱度可使烧结矿中液相增加。

设有程序：
Option Base 1
Private Sub Command1_Click()
Dim arrl, Max As Integer
arrl=Array(12, 435, 76, 24, 78, 54, 866, 43)
【8】 =arrl(1)
For i=1 To 8
If arrl(i)＞Max Then 【9】
Next i
Print "最大值是:" ; Max
End Sub
以上程序的功能是，用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。请填空。