首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有以下程序代码: 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
设有以下程序代码: 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
admin
2018-06-20
76
问题
设有以下程序代码:
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
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)<b(j)条件为真,执行语句print a(i),i=i+1输出1,变量i的值为1;执行循环判断语句i>UBound(a)And j>UBound(b),条件为假,继续执行循环。
第二次循环,变量i=1,j=0,if i<=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,if i<=UBound(8)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,j=5,if j<=UBound(3)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/PaGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Commandl的命令按钮,其单击事件过程如下:PrivateSubCommandl_Click()Fori=3To1Step-1Sum=0
为了暂时关闭计时器,应把它的一个属性设置为False,这个属性是
窗体上有一个名为List1的列表框和一个名为Command1的命令按钮,并有下面的事件过程:PrivateSubCommand1_Click()n%=List1.ListlndexIfn>0Then
VisualBasic根据计算机访问文件的方式将文件分成3类,其中不包括()。
下列关于函数过程的叙述中,正确的是()。
设a=2,b=3,c=4,d=5,表达式Nota
设在工程文件中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString*10TelNumAsString*20EndType在窗体上画-个名为Commandl的
设有以下定义语句:PrivateTypepointxAsIntegeryAsIntegerEndTVpeDimaAspoint下面语句中正确的是
在菜单编辑器中建立如下图所示的菜单,并为了每个菜单项编写了鼠标单击事件过程。关于此菜单,以下叙述中错误的是( )。
设有如下程序段,则正确的说法是Fori=1To100Step0x=x+1Next
随机试题
毒扁豆碱滴眼时引起头痛的原因是
有关异烟肼中毒所致精神障碍的临床表现错误的是
目前对脑胶质瘤常用且诊断价值最大的检查手段是
辨别中风闭脱二证主要在于下列除哪项外的几点根据
为了节约用地和集约利用土地,对于工业建设用地须用指标控制,()不是工业建设用地的控制指标。
境外证券经营机构设立的驻华代表处,经申请可以成为证券交易所的特别会员。()
下列关于“营业税改征增值税”一般纳税人会计处理的表述中,正确的是()。
劳动和社会保险法律适用的基本原则不包括()。
根据有关反垄断诉讼时效的规定,下列说法不正确的是()。
生产力的发展水平决定着受教育的权利。
最新回复
(
0
)