[填空題] 設(shè)有程序： Option Base 1 Private Sub Command1 Click() Dim arrl，Max as Integer arrl=Array(12，435，76，24，78，54，866，43) ______ =arrl(1) For i=1 To 8 If arrl(i)＞Max Then_______ Next i Print“最大值是：”；Max End Sub 以上程序的功能是：用Atray函數(shù)建立一個(gè)含有8個(gè)元素的數(shù)組，然后查找并輸出該數(shù)組中元素的最大值。請(qǐng)?zhí)羁铡?/p>正確答案：

Max

Max=arrl(i) 本題綜合考查數(shù)組的初始賦值與For循環(huán)控制語句。根據(jù)題意，先用Array函數(shù)為數(shù)組arr1賦值，然后令變量Max等于arr1(1)，相當(dāng)于給Max賦了一個(gè)初始值。在For循環(huán)中，進(jìn)行8次循環(huán)，逐一遍歷比較arr1(i)值與Max值的大小，如果arr1(i)＞Max，則令Max值等于此時(shí)的arr1(i)值。通過這個(gè)過程，求出arr1數(shù)組中的最大元素。故第12空填：Max。 根據(jù)上面的分析，第13空應(yīng)該把a(bǔ)rrl(i)賦給 Max，故填：Max=arrl(i)。