首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有以下程序代码: Private Sub Commandl—Click() a=Array(1,2,7,10,6) b=Array(5,4,7,8,2) i=0 j=0 Do If i
设有以下程序代码: Private Sub Commandl—Click() a=Array(1,2,7,10,6) b=Array(5,4,7,8,2) i=0 j=0 Do If i
admin
2019-03-14
63
问题
设有以下程序代码:
Private Sub Commandl—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)
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+l
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 10 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…LDop until循环结构,程序执行过程如下所示:
第一次循环,变量i=0,j=0,ifi<=uBound(a)andj<=UBound(b)条件为真,执行判断语句if a(i)
UBound(a)And j>UBound(b),条件为假,继续执行循环。
第二次循环,变量i=1,j=0,ifi<=UBound(a)andj<=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,ifi<=UBound(a)andj<=UBound(b)条件为真,执行判断语句if a(i)
UBound(a)And j>UBound(b),条件为假,继续执行循环。
第四次循环,变量i=2,j=1,ifi<=UBound(a)andj<=UBound(b)条件为真,执行判断语句if a(i)
UBound(a)And j>UBound(b),条件为假,继续执行循环。
第五次循环,变量i=2,j=2,ifi<:UBound(a)andj<=UBound(b)条件为真,执行判断语句if a(i)
UBound(a)And j>UBound(b),条件为假,继续执行循环。
第六次循环,变量i=2,j=3,ifi<=UBound(a)andj<=UBound(b)条件为真,执行判断语句if a(i)
UBound(a)And j>UBound(b),条件为假,继续执行循环。
第七次循环,变量i=3,j=3,ifi<=UBound(8)andj<=UBound(b)条件为真,执行判断语句if a(i)
UBound(a)And j>UBound(b),条件为假,继续执行循环。
第八次循环,变量i=3,j=4,ifi<=UBound(a)andj<=UBound(b)条件为真,执行判断语句if a(i)
UBound(a)And j>UBound(b),条件为假,绀续执行循环。
第九次循环,变量i=3,j=5,ifi<=UBound(a)andj<=UBound(b)条件为假,执行判断语句Ifi<=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)andj<=UBound(b)条件为假,执行判断语句If i<=UBound(a)条件为真,执行语句pant 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/MsUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1Click()n=InputBox(“输入一个数”)DoWhilen0Printn\10MOd10;:PrintnMod10;:11=n\100LoopPrintsE
为了实现对象的自动拖放,应该设置该对象的一个属性。下面设置中正确的是
要将单选按钮Optl设为被选中,应设置的属性是。
PrintRight(“VBProgramming”,2)语句的输出结果是
VB中,若没有显式声明变量的数据类型,则默认的类型是
为把圆周率的近似值3.14159存放在变量pi中,应该把变量pi定义为
数据库设计中,用E-R图来描述信息结构但不涉及信息在计算机中的表示,它属于数据库设计的
下列不能打开工具箱窗口的操作是()。
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
设a=10,b=4,c=5,d=7,表达式a>bAndNotc<d+6的值为
随机试题
关键工作指的是( )中总时差最小的工作,当计划工期等于计算工期时,总时差为零的工作就是关键工作。
原发性纤溶亢进可见
不属于"五行相乘"的脏腑传变发病的是
《合同法》的具体适用范围包括( )。
巴林银行事件促使银行风险管理朝()方向发展。
财政补助结余资金是指支出预算工作目标已完成,或由于受政策变化、计划调整等因素影响工作终止,下年需按原用途继续使用的财政补助资金。()
“三社四边协定”(中国传媒大学,2009年)
属于法律事件的法律事实有()。
“先试点后推广”是我国推进改革的一个成功做法。一项改革特别是重大改革,先在局部试点探索.取得经验、达成共识后,再把试点的经验和做法推广开来,这样的改革比较稳当。“先试点后推广”的辩证法依据是()
中国人民历来是勇于探索、勇于创造、勇于革命的。
最新回复
(
0
)