[单项选择题] 现有程序如下：Option Base 1Private Sub Form_Click() Dim x(5, 6)As Integer, y(5)As Integer For i

[单项选择题] 现有程序如下： Option Base 1 Private Sub Form_Click() Dim x(5, 6)As Integer, y(5)As Integer For i

[单项选择题] 现有程序如下：

Option base 1

Private Sub Form_Click()

Dim x(5, 6)As Integer, y(5)As Integer

For i = 1 To 5

For j =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 j = 1 To n

b(i) =b(i) +a(i, j)

Next j

Next i

End Sub

关于上述程序，以下叙述中正确的是( )。

A． 调用过程语句有错，参数不匹配

B． 程序有错，数组下标越界

C． y数组中保存的是x数组每行数据之和

D． x数组中数据的取值范围是1-10

正确答案：

C

参考解析：

程序利用了For循环为数组x的5行6列元素以随机整数赋值，随机数的范围是从1到9。过程f的功能是计算二维数组a()的每一行中元素值的和，每一行的和存放在另一个数组b()中，最后程序输出这些和值。因此C正确。