填空题

下列程序的功能是,单击命令按钮时随机生成15个100以内的正整数,放到3×5的数组中,找出该数组中最大的元素,并指出该元素的行标和列标。请填空。
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 3
For 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 3
For j=1 To 5
If 【4】 Then
maximum=a(i, j)
max m=i
max_n=j
End If
Next j
Next i
Print maximum, max m, max n
End Sub

【参考答案】

Int(100*Rnd) a(i,0>maximum