单选题 现有程序如下:
Option Base 1
Private Sub Form_Click()
Dim x(5, 6) As Integer, y(5)As Integer
For j=1 To 5
For i=1 To 6
x(i, j)=Int(Rnd*9+1)
Next j
Next i
Call f(5, 6, x, y)
For i=1 To 5
Print y(i);
Next i
End Sub
Sub f(m As Integer, n As Integer, a() As Integer, b() As Integer)
For i=1 To m
b(i)=0
For i=1 To n
b(i)=b(i)+a(i, j)
Next j
Next i
End Sub
关于上述程序,以下叙述中正确的是
【正确答案】 C
【答案解析】[解析] 本题中子过程f的四个形参分别为整型、整型、整型数组和整型数组,在窗体的单击事件中调用过程f,四个实参和四个形参可以匹配,调用语句没有错误;在二重循环中为二维数组的每个元素赋值,数组下界从1开始,因此不会越界;在二重循环中为数组x的元素赋值为0~9之间的值;在过程f中用一个二重循环以此计算x数组每行数据之和放在y数组中。