2. 计算机
  3. 现有程序如下： 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

现有程序如下： 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

admin2018-12-20  47
问题 现有程序如下：
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正确。
转载请注明原文地址:https://www.kaotiyun.com/show/AfFp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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