首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: 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()
阅读程序: 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()
admin
2018-09-19
16
问题
阅读程序:
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/a6Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设在当前目录下有一个名为"file.txt"的文本文件,其中有若干行文本。编写如下程序:PrivateSubCommand1_Click() Dimch$,asciiAsInteger Open"file.txt"ForInpu
窗体上有一个名为List1的列表框和一个名为Command1的命令按钮,并有下面的事件过程:PrivateSubCommand1_Click() n%=List1.ListIndex Ifn>0Then ch$=List1.Lis
设有如下事件过程:PrivateSubCommand1_Click() Dima a=Array(3,5,6,3,2,6,5,3,5,4,3,9,4,5,6,3,5) x=0 n=UBound(a)
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读人数据”、“计算并输出”和“存盘”),然后添加一个文本框(名称为Text1,可显示多行,ScrollBars属性设置为2)(如图所示)。程序运行后,如果执行“读人数据”命令,则读入
下列关于数组的叙述中,错误的是
编写如下程序:PrivateSubCommand1_Click()DimiAsInteger,numAsIntegerDimarr(10)AsIntegerFori=0To10arr(
编写如下程序:PrivateSubCommand1_Click() DimmAsInteger,nAsInteger n=2 Form=1To3 Printproc(n); NextmEndSubF
某二叉树有5个度为2的结点,则该二叉树中的叶子结点数是( )。
随机试题
在数据通信过程中,将模拟信号还原成数字信号的过程称为__________。
Howoftenonehearschildrenwishingtheyweregrownup,andoldpeoplewishingtheywereyoungagain.Eachagehasitspleasur
患者男性,23岁,体检。心电图如图3—15—5所示,应诊断为
根据有关规范和规定,水利工程建设项目施工监理在施工准备阶段的监理工作基本内容是,检查开工前由发包人准备的施工条件和承包人的施工准备情况。下列不属于检查开工前承包人的施工准备情况的是()。
任何单位、个人不得拆本使用发票。()
过境货物是指由境外起运,通过我国境内设立海关的地点换装运输工具,不通过境内陆路运输,继续运往境外的货物。
“天道有常,不为尧存,不为桀亡”是()的观点。
下列哪项法律关系是民事诉讼法律关系?()
SirJohnSulstongotaNobelPrizeforMedicinebecausehehas______.Peoplemightbeseriouslyillifthecellsintheirbody
Wearerapidlyneartheendofthiscourseinthehistoryof【B1】______music.Wehavecoveredseveralcenturiesinaveryshort
最新回复
(
0
)