2. 计算机
  3. 现有程序如下： Option Base 1 Private Sub Form Click() Dim x(5，6)As Integer,y(5)As Integer For i=1 Tn 5 ForJ=1 To 6 x(i，j)=Int(Rnd*9+1)

现有程序如下： Option Base 1 Private Sub Form Click() Dim x(5，6)As Integer,y(5)As Integer For i=1 Tn 5 ForJ=1 To 6 x(i，j)=Int(Rnd*9+1)

admin2015-05-29  45
问题 现有程序如下：
Option Base 1
Private Sub Form Click()
Dim x(5，6)As Integer,y(5)As Integer
For i=1 Tn 5
ForJ=1 To 6
x(i，j)=Int(Rnd*9+1)
Nextj
Next i
Call f(5，6，x，y)
For i=1 To 5
Print y(i)；
Next i
End Sub
Sub ffm As Integer,n As Integer,a() As Integer,b() As Integer)
For i=1 To m
b(i)=0
Forj=1 To n
b(i)=b(i)+a(i，j)
Nextj
Next i
End Sub
关于上述程序，以下叙述中正确的是
选项 A、调用过程语句有错，参数不匹配
B、程序有错，数组下标越界
C、Y数组中保存的是X数组每行数据之和
D、X数组中数据的取值范围是1．10
答案C
解析 本题中子过程f的四个形参分别为整型、整型、整型数组和整型数组，在窗体的单击事件中调用过程f，四个实参和四个形参可以匹配，调用语句没有错误；在二重循环中为二维数组的每个元素赋值，数组下界从1开始，因此不会越界：在二重循环中为数组x的元素赋值为0～9之间的值；在过程f中用一个二重循环以此计算x数组每行数据之和放在y数组中。
转载请注明原文地址:https://kaotiyun.com/show/fCQp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)