首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: 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 Inte
阅读程序: 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 Inte
admin
2017-06-21
40
问题
阅读程序:
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
Nex 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
解析
本题中的过程P的功能是为形参数组b进行赋值,数组作为参数时采用的是地址传递,所以对形参的改变将会影响实参,也就是在窗体的单击事件中,首先在一个循环中为数组a赋值,然后调用了P过程重新为a赋值覆盖掉原来的值。
转载请注明原文地址:https://www.kaotiyun.com/show/uPGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为File的文件列表框,并编写如下程序:PrivateSubFile1_DblClick()x=Shell(File1.FileName,1)EndSub以下关于该程序的叙述中,
以下关系表达式中,其值为False的是
在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:PrivateSubCommand1_Click()DimiAsInteger,aAsIntegerDoWhilei<20
假定程序中有以下语句:_______。answer=MsgBox("Stringl",,"String2","String3",2)执行该语句后,将显示一个信息框,此时如果单击“确定”按钮,则answer的值为:_______。
如果要改变窗体的标题,则需要设置的属性是
在窗体上面画一个名称为TxtA的文本框,然后编写如下的事件过程:PrivateSubTxtA_KeyPress(Keyasciiasinteger)EndSub若焦点位于文本框中,则能够触发KeyPress事件的操作是__
阅读下面的程序段:Fori=1To3Forj=iTo3Fork=1To3a=a+iNextk
软件设计阶段产生的文档是______。
随机试题
驾驶机动车在下坡路段停车怎样使用行车制动?
患者,男,25岁,上前牙区反复出现脓包就诊,查体牙体变色,颊侧见一小脓点,按压少量脓液流出,舌面见充填物,X线片见根尖区阴影,根中1/3高密度不透光物,诊断为慢性根尖周炎,器械分离。如上诉处理方法不成功,考虑采用何种治疗手段
关于早期绒毛活检,下列哪项不恰当
糖尿病最基本的治疗措施是
下颌骨骨折的好发部位中不包括
患者,女,28岁。患急性乳腺炎10天,脓肿溃破,引流不畅,发热,纳差,舌苔薄黄,脉弦。治疗应首选
A.沉香B.滑石C.芒硝D.没药E.鲜生姜易粘连的饮片是
从混有5个次品的20个零件中任意抽取两个,已经发现其中一个是次品,那么两个都是次品的概率是多少?
陈先生:昨天我驾车时被警察出具罚单,理由是我超速。警察这样做是不公正的。我敢肯定,当时我看到很多车都超速,为什么受罚的只有我?贾女士:你并没有受到不公正的对待,因为警察当时不可能制止所有的超速汽车。事实上,当时每个超速驾驶的人都同样可能被出具罚单。确定
Ibecameinterestedinwritingatanearlyage.Sowhenmyfourth-gradeteachertoldmeabouta【C1】______writer’sconferencew
最新回复
(
0
)