[填空題] 下列程序的功能是，單擊命令按鈕時隨機生成15個100以內(nèi)的正整數(shù)，放到3×5的數(shù)組中，找出該數(shù)組中最大的元素，并指出該元素的行標(biāo)和列標(biāo)。請?zhí)羁铡?Option Base 1 Private Sub Command1_Click() Dim a(1 To 3, 1 To 5) As Integer, n As Integer, m As Integer Dim maximum As Integer, max n As Integer, max_m As Integer Randomize For m=1 To 3For n = 1 To 5 a(m, n)= 【3】 Next n Next m maximum＝a(1, 1) max n=1 : max m=1 For i = 1 To 3For j=1 To 5 If 【4】 Then maximum=a(i, j) max m=i max_n=j End IfNext j Next i Print maximum, max m, max n End Sub

Int(100*Rnd) a(i，0＞maximum

首先通過一個雙循環(huán)結(jié)構(gòu)，生成15個隨機正整數(shù)，要求正整數(shù)在100以內(nèi)。因此第一個空應(yīng)該填I(lǐng)nt(100*Rnd)。第二個雙循環(huán)結(jié)構(gòu)用來尋找數(shù)組中的最大元素。從第一個元素a(1，1)開始， 如果有元素比先前的元素值大，則把該元素的值賦給maximum變量，并用m，n記錄其下標(biāo)。因第二個空的條件表達式應(yīng)該填a(i,j)＞maximum。