单选题现有程序如下：Option Base 1Private Sub Form_Click() Sub f(m As Integer，n As Integer， Dim x(5，6)As Integer，y(5)As Integer a()As Integer，b() As Integer) For i=1 To 5 For i=1 To m For j=1 To 6 b(i)=0 x(i，j)=Int(Rnd*9+1) For j=1 To n Nextj b(i)=b(i)+a(i，j) Next i Nextj Call f(5，6，x，y) Next i For i=l To 5 End Sub Print y(i)； Next iEnd Sub关于上述程序，以下叙述中正确的是

A、调用过程语句有错，参数不匹配
B、程序有错，数组下标越界
C、 y数组中保存的是x数组每行数据之和
D、 x数组中数据的取值范围是1．10

【正确答案】 C

【答案解析】解析：本题中子过程f的四个形参分别为整型、整型、整型数组和整型数组，在窗体的单击事件中调用过程f，四个实参和四个形参可以匹配，调用语句没有错误；在二重循环中为二维数组的每个元素赋值，数组下界从1开始，因此不会越界；在二重循环中为数组x的元素赋值为0～9之间的值；在过程f中用一个二重循环以此计算x数组每行数据之和放在y数组中。