首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有以下程序代码: Private Sub Command1_Click() a=Array(1,2,7,10,6) b=Array(5,4,7,8,2) i=0 j=0 Do If i<=UBoun
设有以下程序代码: Private Sub Command1_Click() a=Array(1,2,7,10,6) b=Array(5,4,7,8,2) i=0 j=0 Do If i<=UBoun
admin
2020-07-22
50
问题
设有以下程序代码:
Private Sub Command1_Click()
a=Array(1,2,7,10,6)
b=Array(5,4,7,8,2)
i=0
j=0
Do
If i<=UBound(a)And j<=UBound(b)Then
If a(i)<b(j)Then
Print a(i);
i=i+1
Else
Print b(j);
j=j+1
End If
Else
If i<=UBound(a)Then
Print a(i);
i=i+1
End If
Ifj<=UBound(b)Then
Print b(j);
j=j+1
End If
End If
Loop Until i>UBound(a)And j>UBound(b)
End Sub
上面事件过程执行后产生的输出是( )。
选项
A、1 5 2 4 7 7 l0 8 6 2
B、1 2 2 4 5 6 7 7 8 10
C、1 2 7 10 6 5 4 7 8 1
D、1 2 5 4 7 7 8 2 10 6
答案
D
解析
程序中变量a和变量b分别为数组变量,并且使用Array函数给两个数组进行了初始化,变量i和J初始值均为0,程序进入Do……Loop Until循环结构,程序执行过程如下所示:
第一次循环,变量i=0,j=0,if i<=UBound(a)and j<=UBound(b)条件为真,执行判断语句if a(i)<b(j)条件为真,执行语句print a(i),i=i+1输出1,变量i的值为1;执行循环判断语句i>UBound(a)And j>UBound(b),条件为假,继续执行循环。
第二次循环,变量i=1,j=0,ifi<=UBound(a)and i<=UBound(b)条件为真,执行判断语句if a(i)<b(j)条件为真,执行语句print a(i),i=i+1输出2,变量i的值为2;执行循环判断语句i>UBound(a)And j>UBound(b),条件为假,继续执行循环。
第三次循环,变量i=2,j=0,if i<=UBound(a)and j<=UBound(b)条件为真,执行判断语句if a(i)<b(j)条件为假,执行语句Print b(j),j=j+1输出5,变量j的值为1;执行循环判断语句i>UBound(a)And j>UBound(b),条件为假,继续执行循环。
第四次循环,变量i=2,j=1,if i<=UBound(a)and j<=UBound(b)条件为真,执行判断语句if a(i)<b(j)条件为假,执行语句Print b(j),j=j+1输出4,变量j的值为2;执行循环判断语句i>UBound(a)And J>UBound(b),条件为假,继续执行循环。
第五次循环,变量i=2,j=2,if i<=UBound(a)and j<=UBound(b)条件为真,执行判断语句if a(i)<b(j)条件为假,执行语句Print b(j),j=j+1输出7,变量j的值为3;执行循环判断语句i>UBound(a)And j>UBound(b),条件为假,继续执行循环。
第六次循环,变量i=2,j=3,if i<=UBound(a)and j<=UBound(b)条件为真,执行判断语句if a(i)<b(j)条件为真,执行语句print a(i),i=i+1输出7,变量i的值为3;执行循环判断语句i>UBound(a)And j>UBound(b),条件为假,继续执行循环。
第七次循环,变量i=3,j=3,if i<=UBound(a)and j<=UBound(b)条件为真,执行判断语句if a(i)<b(j)条件为假,执行语句Print b(j),j=j+1输出8,变量j的值为4;执行循环判断语句i>UBound(a)And j>UBound(b),条件为假,继续执行循环。
第八次循环,变量i=3,j=4,if i<=UBound(a)and j<=UBound(b)条件为真,执行判断语句if a(i)<b(j)条件为假,执行语句Print b(j),j=j+1输出2,变量j的值为5;执行循环判断语句i>UBound(a)And j>UBound(b),条件为假,继续执行循环。
第九次循环,变量i=3,j=5,if i<=UBound(a)and j<=UBound(b)条件为假,执行判断语句If i<=UBound(a)条件为真,执行语句print a(i),i=i+1输出10,变量i的值为4;执行循环判断语句i>UBound(a)And j>UBound(b),条件为假,继续执行循环。
第十次循环,变量i=4,i=5,if i<=UBound(a)and j<=UBound(b)条件为假,执行判断语句If i<=UBound(a)条件为真,执行语句print a(i),i=i+1输出6,变量i的值为5;执行循环判断语句i>UBound(a)And j>UBound(b),条件为真,循环结束。
所以程序输出的结果为1 2 5 4 7 7 8 2 10 6,D选项正确。本题选择D选项。
转载请注明原文地址:https://kaotiyun.com/show/JRHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在结构化程序设计中,模块划分的原则是
下列有关文件的叙述中,正确的是
编写如下程序:OptionBase1PrirateSubCommand1_Click()Dimaa=Array(1,2,3,4):s=0:j=1Fori=4To1Step-1
命令按钮Commandl的事件过程如下:PrivateSubCommandl_Click()Dimart(5,5)AsIntegerDimiAsInteger,jAsInteger
在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码:OptionBase1PrivateSubCommandl_Click()Dimaa=Array(1,2,3,4)j=1Fori=4T01Step-1S=S
下面关于菜单的叙述中正确的是
以下合法的VB变量名是
设A、B、C是三角形的3条边,则以下表示“任意两边之和大于第三边”的布尔表达式是
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtSt]rAsString.strLAsIntegertStr=""strL=Len(xStr)i=1
为了使标签Labell透明且不具有边框,以下正确的属性设置是
随机试题
已知普鲁卡因酰胺胶囊剂的F为0.85,t1/2为3.5h,V为2.0L/kg。若患者每4h口服一次,剂量为7.45mg/kg时,那么为
患者男,18岁,目前正在服用苯妥英钠治疗癫痫,该药最常见的副作用是
婴幼儿易患呼吸道感染的免疫特点是
A公司为扩大生产能力,经公司董事会讨论后决定收购B公司。从决定主体角度看,这种决策属于()
()调查了解项目所在地区的社会环境等方面的情况。调查的内容包括项目所在地区的基本情况和受影响的社区的基本社会经济情况在项目影响时限内可能的变化。
这些年来,中国文学的创作取得了长足进步,许多作品也不乏________底层的人文情怀,而唯独缺少________星空的超越性力量。填入画横线部分最恰当的一项是:
下列句子中,没有通假字的一项是()。
某初中生在行动中能以坚韧不拔的毅力克服种种困难而坚持到底,这是他意志()品质的表现。
________theflood,theshipwouldhavereachedit’sdestinationontime.
Thoughsomepeoplehavesuggestedthatwomenshouldreturntohouseworkinordertoleavemorejobsformen,theideahasbeenr
最新回复
(
0
)