首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读下面程序代码: Private Sub Command1_Click() Dim temp As Integer a=Array(2,7,4,10,0,1,8,5,3,9,6) For i=7 To 4 Step-1
阅读下面程序代码: Private Sub Command1_Click() Dim temp As Integer a=Array(2,7,4,10,0,1,8,5,3,9,6) For i=7 To 4 Step-1
admin
2018-07-11
33
问题
阅读下面程序代码:
Private Sub Command1_Click()
Dim temp As Integer
a=Array(2,7,4,10,0,1,8,5,3,9,6)
For i=7 To 4 Step-1
For j=3 To i-1
If a(j)>a(j+1)Then
temp=a(j)
a(j)=a(j+1)
a(j+1)=temp
End If
Next j
Next i
For i=0 To 10
Print a(i);
Next i
End Sub
此程序代码运行后的输出是( )。
选项
A、2 7 4 0 1 5 8 10 3 9 6
B、0 1 2 3 4 5 6 7 8 9 10
C、2 7 0 1 4 5 8 10 3 9 6
D、2 7 4 10 0 1 3 5 8 9 6
答案
A
解析
Array函数用来为数组元素赋值,即把一个数据集读入某个数组。本题利用Array函数,将一组整型数据读入到数组变量a中。利用二重For循环对数组中的部分元素进行排序,循环执行过程中,各变量的值如下表所示。
循环结束后数组中各元素的值依次为:(2,7,4,0,1,5,8,10,3,9,6);所以A选项正确。
转载请注明原文地址:https://kaotiyun.com/show/YzFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下程序:Functionfun(ByValhumAsInteger)AsIntegerDimkAsIntegerk=1nuln=Abs(num)DoWhilehumk=k*(humMod10):hum=hu
以下能够正常结束循环操作的程序段是
假定有如下情况语句:SelectCaseX能表示|X|>5的Case子句是
以下程序的功能是随机产生10个两位的整数:OptionBase1PrivateSubCommand1_Click()Dima(10)AsInteger,iAsIntegera(i)=Int(Rnd*100)+1Pr
命令按钮Command1的MouseUp事件过程结构如下:PrivateSubCommand1-MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)EndSub
下列程序执行后,其输出结果为()。Dima(5)Fori=0To4a(i)=i+1:m=i+1Ifm=3Thena(m-1)=a(i-2)Elsea(m)=a(i)Ifi=2Thena(i-1)=a(m-3)a(4
在窗体上画2个文本框(名称分别为Text1和Text2),一个命令按钮(名称为Command1)。并定义以下记录类型和变量:PrivateTypeTeacherIDAsIntegerNameAsString*10En
函数表达式Sgn(-10)的值是
设循环队列为Q(1:m),其初始状态为front=rear=m。经过一系列入队与退队运算后,front=15,rear=20。现要在该循环队列中寻找最大值的元素,最坏情况下需要比较的次数为
执行以下程序段:a$="VisualBasicProgramming"b$="C++"c$=UCase(Left$(a$,7))&b$&Right$(a$,12)后,变量c$的值为( )。
随机试题
科学发展观强调社会主义民主政治的本质和核心是()
民众戏剧社
被告人,李某,男,25岁,农民。被告人,王某,男,22岁,农民。被告人李某和王某是同乡,两人约好一同外出,但没有找到合适的工作,只好返乡。途中在株洲转车,两人身上所带钱已所剩无几,看到车站附近有一杂货店,顿生邪念,商量去抢杂货店,就用剩余的钱买了两把匕首。
意志的培养预防心身疾病
小儿腹泻应用2:1等张含钠液的适应证是()
为卧床病人洗发时,下列操作不正确的是
某钢筋混凝土梁板结构的建筑,内隔墙采用加气混凝土砌块,在设计无要求的情况下,其抹灰工程均采用了水泥砂浆抹灰,内墙的普通抹灰厚度控制在20mm,外墙抹灰厚度控制在40mm,并加入含氯盐防冻剂,窗台下的滴水槽的宽度和深度均不小于6mm。问题:
根据合同法相关规定,关于技术开发合同的说法错误的是()。
BeMoreWeil-Spoken1.Preparealot■【T1】______yourideasbeforeyousaythem【T1】______■【T2】______whatyou’ll
Shebehavesasthoughshe______.
最新回复
(
0
)