现有程序如下： Option Base 1 Private Sub Form_Click() Dim x(5，6)As Integer,y(5)As Integer For i=1 To 5

admin2020-01-02 21

问题现有程序如下：
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)
         Nextj
      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
         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/N6Tp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

现有程序如下： Option Base 1 Private Sub Form_Click() Dim x(5，6)As Integer,y(5)As Integer For i=1 To 5

二级VB

NCRE全国计算机二级

(1)在名称为Form1，标题为“矩形与直线”的窗体上画一个名称为Linel的直线，其X1、Y1属性分别为200、100，X2、Y2属性分别为2200，1600。再画一个名称为Shape1的矩形，并设置适当属性，使Linel成为它的对角线，如图3．19所示

请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上添加一个计时器控件，名称为Timer1。请利用属性窗口设置适当属性，使得在运行时可以每隔1秒，调用计时器的Timer事件过程一次。另外，

下列工具中，不属于结构化分析的常用工具的是()。

在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是()。