首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click() Dim a(1 To 6)As Integer Dim min1%,i%,j%,n%,t%,k% a(1)=8
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click() Dim a(1 To 6)As Integer Dim min1%,i%,j%,n%,t%,k% a(1)=8
admin
2020-02-27
55
问题
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。
Private Sub Form_Click()
Dim a(1 To 6)As Integer
Dim min1%,i%,j%,n%,t%,k%
a(1)=8:a(2)=6:a(3)=9:a(4)=3:a(5)=2:a(6)=7
n=6
For i=1 To n-1
min1=i
For i=i+l To n
Ifa(j)<a(min1)Then min1=j
Nextj
t=a(i):a(i)=a(min1):a(min1)=t
Next i
For i=1 To n
Print a(i)
Next i
End Sub
选项
A、9 8 7 6 3 2
B、2 3 6 7 8 9
C、9 8 7 6 3
D、2 3 6 7 8
答案
B
解析
本题考查循环程序的分析。程序主要包括两条循环语句,一条为两层循环的嵌套语句,内层循环找到当前i到n之间的最小元素的下标,退出内循环则把最小元素放到a(i)的位置,i从1变化到n-1;另外一条循环语句为输出数组中的所有元素,即把排序以后的结果输出。
转载请注明原文地址:https://www.kaotiyun.com/show/VHTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击命令按钮时,下列程序段的执行结果为()。PrivateSubCommandl_Click()PrintFuncl(24,18)EndSubPublicFunctionFuncl
已知数组Dima(1To10)AsInteger,则下面正确调用GetValue函数的是()。PrivateFunctionGetValue(a()AsInteger)AsIntegerFori=lTo1
以下程序的功能是:把父目录下顺序文件smtextl.txt的内容读入内存,并在文本框Text3中显示出来。请选择适合横线处的语句()。PrivateSubCommand1_Click()DiminDataAsStrin
满足下列条件之一的年份是闰年:1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份,下面判断闰年的正确表达式是( )。
关系数据库管理系统能实现的专门关系运算包括()。
以下关系表达式中,其值为True的是()。
在数据库管理技术发展的三个阶段中,没有专门的软件对数据进行管理的是()。
以下关于注释语句的叙述中,错误的是
下列不一定是传值的虚实结合方式的选项是()。
随机试题
肩关节脱位的特殊表现是
前置胎盘的诊断下列哪些正确()
转让动产所得的应税所得来源地标准,按照所转让动产的所在地确定。()
余姚人王守仁,主张“心即理”、“致良知”。()
面对新技术、新媒体、思想文化新领域,到底是挺身人局还是_________?是与时俱进还是_________?夏衍、田汉等先行者的艰辛与辉煌,已经写在了历史深处,我们这一代共产党人,正面临着网络时代的挑战和考验。填入画横线部分最恰当的一项是:
在首届华东MBA羽毛球团体赛上,参加男单比赛的运动员也参加了混双比赛。再加入以下哪项陈述,可以推出“有些参加男双比赛的运动员没有参加男单比赛”?
(98年)从船上向海中沉放某种探测仪器,按探测要求,需确定仪器的下沉深度y(从海平面算起)与下沉速度v之间的函数关系.设仪器在重力作用下,从海平面由静止开始铅直下沉,在下沉过程中还受到阻力和浮力的作用.设仪器的质量为m,体积为B,海水比重为ρ,仪器所受的阻
求
一个园区网内某VLAN中的网关地址设置为195.26.16.1,子网掩码设置为255.255.240.0,则IP地址(42)不属于该VLAN。该VLAN最多可以配(43)台 IP地址主机。
Thisisoneofthelargest______(know)seaanimalsintheworld.
最新回复
(
0
)