阅读程序： Option Base 1 Sub P(b() As Integer) For i = 1 To 4 b(i) = 2 * i Next i End Sub Private Sub Form_Click()

admin2018-09-19 60

问题阅读程序：
Option Base 1
Sub P(b() As Integer)
For i = 1 To 4
      b(i) = 2 * i
Next i
End Sub
Private Sub Form_Click()
Dim a(4) As Integer
For i = 1 To 4
      a(i) = i + 4
Next i
P a
For i = 1 To 4
      Print a(i)
Next i
End Sub
运行上面的程序，单击窗体，输出结果为

选项 A、 2
4
6
8
B、 5
6
7
8
C、10
12
14
16
D、 4
8
12
16

答案A

解析 Form_Click过程中首先对a数组用For循环赋值。然后调用过程P。注意P参数传递是引用传递，因此数组a的元素值在执行P过程后会被改变。之后的For换输出变量值是过程P中对数组元素的赋值。选A）。

转载请注明原文地址:https://kaotiyun.com/show/y9Fp777K

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

二级VB

NCRE全国计算机二级

相关试题推荐

下面程序计算并输出的是(　　)。PrivateSubCommand1_Click()　　a＝10　　s＝0　　Do　　　　s＝s＋a*a*a　　　　a＝a－1　　LoopUntila
如果在窗体模块中所有程序代码的前面有语句：Dimx，则x是(　　)。
PrintRight("VBProgramming"，2)语句的输出结果是(　　)。
PrintFormat(1234.56，"###.#")语句的输出结果是(　　)。
(1)在考生文件夹下有一个工程文件sjt3．vbp。其窗体文件上有一个标题为“得分”的框架，在框架中有一个名称为Text1的文本框数组，含6个文本框控件；文本框Text2用来输入难度系数。程序运行时，在左边的6个文本框中输入6个得分，输入难度系数后，单击“
有三个关系R、S和T如下：则由关系R和S得到关系T的操作是(　　)。
为了用形状控件画出不同的图形，应设置的属性是
在关系数据库中，用来表示实体间联系的是
(1)在考生文件夹中有一个工程文件sjt3．vbp，窗体控件布局如图1所示。程序运行时，输入一个正整数到文本框Text1中，选择“偶数和”或“奇数和”，则在Label2中显示所选的计算类别。单击“计算”按钮时，将按照选定的“计算类别”计算小于或等于输入数据
设循环队列存储空间为Q(1:50)。初始状态为front=rear=50。经过一系列入队和退队操作后，front=14，rear=19，则该循环队列中的元素个数为

随机试题

主张在组织中保持比较小的管理幅度的人是()
可笑的，荒谬的adj.r_________
患儿，女，5个月，因发热、鼻塞入院，查体可见体温39．6℃，咽部充血，诊断为感冒，该患儿的护理措施首选()
()是基桩承台发生冲切破坏的主要原因。
根据《公司法》的规定，国有独资公司监事会主席的产生方式是()。
某食用油企业现场加工，人们都去买，生意火爆，很多城里人去乡下租地种菜，你怎么看?
现有26株树苗，要分植于5片绿地上，若使每绿地上分得的树苗数各不相同，则分得树苗最多的绿地至少可以分得几株树苗?()
历史经验表明经济危机往往孕育着新的科技革命，1857年世界经济危机引发的电气革命，推动人类社会从蒸汽时代进入电气时代。1929年的世界经济危机引发的电子革命，推动人类社会从电气时代进入电子时代。由此证明()
Atwhattimedoestheofficeopen?
WhatisSallydoing?

最新回复(0)

阅读程序： Option Base 1 Sub P(b() As Integer) For i = 1 To 4 b(i) = 2 * i Next i End Sub Private Sub Form_Click()

二级VB

NCRE全国计算机二级

下面程序计算并输出的是( )。PrivateSubCommand1_Click() a＝10 s＝0 Do s＝s＋a*a*a a＝a－1 LoopUntila

如果在窗体模块中所有程序代码的前面有语句：Dimx，则x是( )。

PrintRight("VBProgramming"，2)语句的输出结果是( )。

PrintFormat(1234.56，"###.#")语句的输出结果是( )。

有三个关系R、S和T如下：则由关系R和S得到关系T的操作是( )。

为了用形状控件画出不同的图形，应设置的属性是

在关系数据库中，用来表示实体间联系的是

设循环队列存储空间为Q(1:50)。初始状态为front=rear=50。经过一系列入队和退队操作后，front=14，rear=19，则该循环队列中的元素个数为

主张在组织中保持比较小的管理幅度的人是()

可笑的，荒谬的adj.r_________

患儿，女，5个月，因发热、鼻塞入院，查体可见体温39．6℃，咽部充血，诊断为感冒，该患儿的护理措施首选()

()是基桩承台发生冲切破坏的主要原因。

根据《公司法》的规定，国有独资公司监事会主席的产生方式是()。

某食用油企业现场加工，人们都去买，生意火爆，很多城里人去乡下租地种菜，你怎么看?

现有26株树苗，要分植于5片绿地上，若使每绿地上分得的树苗数各不相同，则分得树苗最多的绿地至少可以分得几株树苗?()

历史经验表明经济危机往往孕育着新的科技革命，1857年世界经济危机引发的电气革命，推动人类社会从蒸汽时代进入电气时代。1929年的世界经济危机引发的电子革命，推动人类社会从电气时代进入电子时代。由此证明()

Atwhattimedoestheofficeopen?

WhatisSallydoing?

下面程序计算并输出的是(　　)。PrivateSubCommand1_Click()　　a＝10　　s＝0　　Do　　　　s＝s＋aaa　　　　a＝a－1　　LoopUntila

如果在窗体模块中所有程序代码的前面有语句：Dimx，则x是(　　)。

PrintRight("VBProgramming"，2)语句的输出结果是(　　)。

PrintFormat(1234.56，"###.#")语句的输出结果是(　　)。

有三个关系R、S和T如下：则由关系R和S得到关系T的操作是(　　)。