首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click( ) Dim a(1 To 6)As Integer Dim min1%,i%,j%,n%,t%,k% a(1)=8:a(2)=6
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click( ) Dim a(1 To 6)As Integer Dim min1%,i%,j%,n%,t%,k% a(1)=8:a(2)=6
admin
2020-07-22
49
问题
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。
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
min 1=i
Forj=i+1 To n
If a(j)<a(min1)Then mini=j
Next j
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从l变化到n-1;另外一条循环语句为输出数组中的所有元素,即把排序以后的结果输出。
转载请注明原文地址:https://kaotiyun.com/show/ajHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubFor
在属性窗121中把窗体的KeyPreview属性设置为True,然后编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintCh
执行以下程序段:a$="VisualBasicProgramming"b$="C++"c$=UCase(Left$(a$,7))&b$&Right$(a$,12)后,变量c$的值为( )。
在菜单编辑器中建立如下图所示的菜单,并为了每个菜单项编写了鼠标单击事件过程。关于此菜单,以下叙述中错误的是( )。
在窗体上有一个文本框Textl,Text属性值为空,然后编写如下事件过程:PrivateSubTextlKeyPress(KeyAsciiAsInteger)DimstrAsString,nAsInteger
要清除已经在图片框Picturel中打印的字符串而不清除图片框中的图像,应使用语句()。
以下关于过程及过程参数的描述中,错误的是()。
数据库设计的四个阶段是:需求分析、概念设计、逻辑设计和()。
能够产生1到50之间(含1和50)随机整数的表达式是()。
随机试题
对结核菌有杀菌力,但对细胞内结核菌作用较小的是
女,24岁,G1P0,妊娠33周,头痛6天,经检查血压160/110mmHg,治疗3天无明显效果。当日5时突然出现剧烈腹痛,检查子宫板状硬。最可能的诊断是
A.地黄饮子B.解语丹C.天麻钩藤饮D.补阳还五汤E.镇肝熄风汤半身不遂肝阳上亢证,宜选用的方剂是()。
以下选项中不属于燃油燃烧的特点的是()。
建筑施工企业项目经理,是受企业()委托对工程项目施工过程全面负责的项目管理者。
经济落后地区的城镇土地使用税适用税额标准可以适当降低,但降低额不得超过规定的最低税额的()。
根据下列统计资料回答问题。生物多样性是人类社会赖以生存和发展的基础。我们的衣、食、住、行及物质文化生活的许多方面都与生物多样性的维持密切相关。由于自然资源的合理利用和生态环境的保护是人类实现可持续发展的基础,因此生物多样性的研究和保护已经成为世界
请从编辑的角度,评析下面这篇稿件。(人大1995年研)材料:
现代计算机中采用二进制码,下列选项中不是它的优点是
Note:Whenmorethanoneanswerisrequired,thesemaybegiveninanyorder.Somechoicesmayberequiredmorethanonce.A
最新回复
(
0
)