[填空題] 設(shè)有程序：

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函數(shù)建立一個含有8個元素的數(shù)組，然后查找并輸出該數(shù)組中元素的最大值。請?zhí)羁铡?/p>正確答案：

[8]Max [9]Max=arrl(i)解析：[分析]： 當定義變量Max以后，系統(tǒng)自動給其賦初值為0。將數(shù)組第一個元素值賦值給Max，再將它與其他各數(shù)組元素逐個進行比較。若某個元素值比Max大，就將其賦值給Max，從而保證Max中始終是最大的值。