首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Private Sub Command1_Click() Dim a(6)As Integer For k=0 To 5 a(k)=k*2+1 Next k proc a,4,0 F
有下面程序代码: Private Sub Command1_Click() Dim a(6)As Integer For k=0 To 5 a(k)=k*2+1 Next k proc a,4,0 F
admin
2019-06-20
52
问题
有下面程序代码:
Private Sub Command1_Click()
Dim a(6)As Integer
For k=0 To 5
a(k)=k*2+1
Next k
proc a,4,0
For k=0 To 6
Print a(k);
Next k
End Sub
Private Sub proe(b()As Integer,n As Integer,x
As Integer)
For k=UBound(b)To n Step一1
b(k)=b(k一1)
Next k
b(k)=X
End Sub
执行Command1_Click事件过程后产生的输出是( )。
选项
A、1 3 5 4 0 7 9 11
B、1 3 5 7 0 9 11
C、1 3 5 0 7 9 11
D、1 3 5 0 9 11
答案
C
解析
在过程Command1_Click中定义了一个数组a,第一个For循环的功能是:为数组中的元素赋值,循环执行结束后,a(0)=1;a(1)=3;a(2)=5;a(3)=7;a(4)=9;a(5)=11。接着使用语句proc a,4,0调用过程proc,并传递相应的参数,其中第一个参数为数组名,当用数组作为过程的参数时,使用的是“传地址”的方式,也就是说实参a和形参b指向的是同一个存储空间,对数组b的任何修改本质上都是修改数组a。过程proc中使用UBound函数获得数组下标的上界值,循环变量k的初始值为6,终止值为4。当k=6时,执行语句b(6)=b(5)=11;当k=5时,执行语句b(5)=b(4)=9;当k=4时,执行语句b(4)=b(3)=7,循环结束后执行语句b(3)=0,所以最终数组a中各元素的值依次为:1,3,5,0,7,9,11。C选项正确。本题选择C选项。
转载请注明原文地址:https://kaotiyun.com/show/CfUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(如图1所示),就可以把文本框中的内容写到文件Out.txt中,每次写入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是()。
InputBox函数返回值的类型为()。
为了使名称为Command1的命令按钮右移200,应使用的语句是()。
在窗体上有一个名为Command1的命令按钮,并有如下事件过程:PrivateSubCommand1_Click()aS="SwallowsModGenulled"b$=Right(aS,8):c$=Mid(aS,1.
构成计算机软件的是
设窗体上有2个直线控件Line1和Line2,若使两条直线相连接,需满足的条件是
以下关于事件、事件驱动的叙述中,错误的是
以下描述中,不是线性表顺序存储结构特征的是()。
设循环队列的存储空间为Q(1:m),初始状态为空。现经过一系列正常的人队与退队操作后,front=m,rear=m-1,此后从该循环队列中删除一个元素,则队列中的元素个数为()。
随机试题
Herearesomesuggestionsthatprovehelpfulforthosewhoarepreparingforajobinterview.Insomeway,a(n)【B1】______interv
下列为头孢曲松的制剂是
基托磨光面一般应呈
在对客户的诚信进行了解时,需要考虑的主要事项包括()
审计证据与审计工作底稿之间的关系怎样?
①认知心理学里有一个概念叫“通道容量(thechannelcapacity)”,说的是人的大脑在一定时间内所能接受和传递信息的有限性或极限性。给你20杯冰茶,每一杯里都放了不同数量的糖,让你逐个品尝,并根据甜味的程度来分档,你最多能区分出六七杯,然后就开始
请从所给的选项中,选择最合适的一个填入问号处,使之呈现一定的规律性:
WhatdoesTonydo?
Onemusttryhisbestto______tothenewenvironment.
我要是准备充分的话,我就成功了。(succeed)
最新回复
(
0
)