首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有以下程序代码: 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
设有以下程序代码: 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
admin
2019-06-20
27
问题
设有以下程序代码:
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)
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
If j<=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……Loop Until循环结构,程序执行过程如下所示:
第一次循环,变量i=0,j=0,if i<=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)
uBound(a)And j>UBound(b),条件为假,继续执行循环。
第三次循环,变量i=2,j=0,if i<=UBound(a)and j<=UBound(b)条件为真,执行判断语句if a(i)
UBound(a)And j>UBound(b),条件为假,继续执行循环。
第四次循环,变量i=2,j=l,ifi<=UBound(a)and j<=UBound(b)条件为真,执行判断语句if a(i)
UBound(a)And j>L/Bound(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,if i<=UBound(a)and j<=UBound(b)条件为真,执行判断语句if a(i)
UBound(a) And j>UBound(b),条件为假,继续执行循环。
第八次循环,变量i=3,j=4,ifi<=uBound(a)and j<=UBound(b)条件为真,执行判断语句if a(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 i>UBound(b),条件为假,继续执行循环。
第十次循环,变量i=4,j=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 i>UBound(b),条件为真,循环结束。
所以程序输出的结果为1 2 5 4 7 7 8 2 10 6,D选项正确。本题选择D选项。
转载请注明原文地址:https://kaotiyun.com/show/RSUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tStud”,同时还设计出窗体对象“fStud”。请在此基础上按照以下要求补充“fStud”窗体的设计。(1)在窗体的“窗体页眉”中距左边0.4cm、距上边1.2cm
考生文件夹下有一个数据库文件“samp3.accdb”,其中存在已经设计好的表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。请在此基础上按照以下要求补充设计。(1)将表对象“tEmp”中的“聘用时间”字段的格式
在考生文件夹下的“samp1.acedb”数据库文件中已建立了表对象“tEmployee”。请按以下操作要求,完成表的设计。(1)判断并设置“tEmployee”表的主键。(2)设置“性别”字段的默认值为“男”。(3)删除表中
(1)考生文件夹下的工程文件sjt3.vbp中有1个名称为Label1的标签数组。程序运行时,单击“产生随机数”按钮,则在标签数组中显示随机数,如图3—21(a)所示。单击“数据反序”按钮,则把数组中的数据反序,如图3—21(b)所示。命令按钮的Click
设有一个有10个元素的数组,下列程序将该数组的第1个元素与第10个元素交换,第2个元素与第9个元素交换……,第5个元素与第6个元素交换,在横线处应填写()。PrivateSubCommand1_Click()Dima(1To10)AsI
有下列程序,运行后的结果为()。X=2.4:Y=3:Z=5Print"A(";X+Y*Z;")"
在考生文件夹下有一个工程文件sjt5.vbp。程序功能如下:1)单击“读数据”按钮,从文件中读出数据,放入二维数组a中。2)单击“生成新数组”按钮时,依据a数组生成b数组;若a数组元素为素数,则直接将a数组元素的值赋给b数组中相同下标的数组元素;若a数
以下程序在文本框Text1中输入任一字符串,并按相反的次序显示在文本框Text2中,在横线处应填写()。DimNAsString,CAsString,DAsStringN=Text1.TextM=______________F
设x为一整型变量,且语句的开始为:SelectCasex,则不符合语法规则的Case子句是
随机试题
证明曲线积分∫(1,2)(3,4)(6xy2-y3)dx+(6x2y-3xy2)dy在整个坐标面xOy上与路径无关,并计算积分值.
Whenthestudentsdidbadly,theteacherbecamereally_________anddidn’tsmileforweeks.
患儿,男孩,7岁,因发热、意识障碍诊断为病毒性脑炎收入院治疗。该病的护理措施哪项不妥
使用增感屏可使
A.金黄色葡萄球菌肺炎B.腺病毒肺炎C.毛细支气管炎D.支原体肺炎E.支气管肺炎主要由肺炎链球菌引起的肺炎是
《中华人民共和国环境保护法》规定,国家采取财政、税收、价格、政府采购等方面的政策和措施,鼓励和支持环境保护技术装备、()和环境服务等环境保护产业的发展。
国际金融危机的成因不包括()。
Whereisthisannouncementmade?
Therepairmancanmendwhatever_______.
Little______whatwasupsettingme.
最新回复
(
0
)