首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有以下程序代码: 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
53
问题
设有以下程序代码:
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全国计算机二级
相关试题推荐
考生文件夹下有一个数据库文件“samp2.accdb”,其中存在已经设计好的3个关联表对象“tStud”、“tCourse”和“tScore”及表对象“tTemp”。请按以下要求完成设计。(1)创建一个查询,查找并显示学生的“姓名”、“课程名”和
考生文件夹下有一个数据库文件“samp3.accdb”,其中存在已经设计好的表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。请在此基础上按照以下要求补充设计。(1)将表对象“tEmp”中的“聘用时间”字段的格式
在考生文件夹下的“samp1.accdb”数据库文件中已建立表对象“tStud”和“tScore”、宏对象“mTest”和窗体“fTest”。请按以下要求,完成各种操作。(1)分析并没置表“tScore”的主键。(2)将学生“入校时间”
不能正确表示条件“两个整型变量A和B之一为0,但不能同时为0”的布尔表达式是()。
窗体Form1上有一个名称为Command1的命令按钮,以下对应窗体单击事件的事件过程是()。
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(如图所示),就可以把文本框中的内容写到文件Out.txt中,每次写入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是()。
关系表中的每一行记录称为一个()。
要使菜单项MenuOne在程序运行时失效,应使用的语句是()。
在考生文件夹中有一个工程文件sjt5.vbp,如图3—164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
随机试题
急性细菌性心内膜炎患者瓣膜赘生物中的成分包括
既有季节特点,而又不受季节限制,又常为外感病先导的邪气是
患儿,男,3岁,2天前出现发热、咳嗽,今日晨起头痛、呕吐、烦躁、意识模糊,体检见意识不清,上视受累(落日眼),脑膜刺激征阳性。患儿上视障碍的原因是
A.色素沉着B.身材矮小C.身材高大D.消瘦E.肥胖呆小症患者常可出现
某民营企业投资建设一大型主题公园,按照《国务院关于投资体制改革的决定》附件(2004年本)的要求,该项目应由()。
某工程公司总承包一中型炼油厂项目,经建设单位同意,把该厂的通用设备安装分包给A公司,防腐保温工程分包给B公司,给水排水工程分包给c公司,这三家公司均具有相应的施工资质。并分别与A、B、c公司签订了分包合同。合同执行过程中发生了下列事件:事件一:A
某公司从澳大利亚进口一批羊毛,在韩国转船后运抵我国,报检不需提供( )
根据《社会保险法》,下列生活在甲市的人员中,可以参加甲市基本养老保险的有()。
(2017·河北)县级人民政府教育行政部门应当均衡配置本行政区域内学校师资力量,组织校长、教师的(),加强对薄弱学校的建设。
OnNewYear’sDay,1985,MichaelHarrisonphonedhisfather,SirErnest,towishhimaHappyNewYear.SirErnestwaschairmano
最新回复
(
0
)