首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click() Dim a(1 To 6)As Integer Dim minl%,i%,j%,n%,t%,k% a(1)=8
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click() Dim a(1 To 6)As Integer Dim minl%,i%,j%,n%,t%,k% a(1)=8
admin
2016-03-21
34
问题
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。
Private Sub Form_Click()
Dim a(1 To 6)As Integer
Dim minl%,i%,j%,n%,t%,k%
a(1)=8:(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+1 To n
Ifa(j)
Nextj
t=a(i):a(i)=a(minl):a(minl)=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://kaotiyun.com/show/ArLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列能正确输出2,345.67的语句是()。
使两种完全不同的应用程序进行通信的技术称为()技术。
在窗体上画一个命令按钮,名称为Commandl,然后编写如下代码:OptionBase0PrivateSubCommandl_Click()DimA(4)AsInteger,B(4)AsIntegerFo
下列关于图片框的语句中错误的是()。
在一个窗体上有一个命令按钮CmdMax。单击CmdMax时,窗体上显示“字体由小变大”,字号每次增加2。请填空。PrivateSubForm_Load()Form1.Caption="字体变化示范"CmdMax.Caption="字体变大"En
以下叙述不正确的是______。
下列程序段的执行结果为______。Dimm(3,3)AsIntegerDimiAsIntegerDimjAsIntegerDimxAsIntegerFori=1To3m
数据库设计包括两个方面的设计内容,它们是
下列可作为VisualBasic变量名的是
在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。当改变当前驱动器时,目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中,这个事件过程是()。
随机试题
Thatisanothertopicthatwillcome______discussion.
中蜜老蜜
【背景资料】某承包商通过竞标取得某标段公路建设项目后,立即组织施工队伍进场施工。为保证工期和控制成本,同时考虑到自身特点及业主和监理工程师的要求,承包商决定将一部分防护工程和部分通道与涵洞工程分包给另一个承包商施工,报业主或监理工程师审查后,该承
注册税务师在审核某增值税一般纳税人申报缴纳增值税时,发现下列情况应作为纳税义务发生确认应税销售实现的有()。
长江公司于2016年1月1日以银行存款3100万元取得了大海公司30%的有表决权股份,对大海公司能够施加重大影响,大海公司当日的可辨认净资产公允价值为11000万元。2016年1月1日,大海公司除一项固定资产的公允价值与其账面价值不同外,其他资产和负债的
曹丕是建安文学的代表人物之一,其代表作()是现存最早的完整的七言诗。
孔子提出了“力行而近乎仁”这一观点,它所反映的德育原则是()。
数据结构包括数据的逻辑结构、数据的【】以及对数据的操作运算。
Rainisnotwhatitusedtobe.AnewstudyrevealsthatmuchoftheprecipitationinEuropecontainssuchhighlevelsofdissol
InAmerica,marriageisamatterofindividualresponsibilityanddecisionfortheyoung.Theyhavetheirownrightto【B1】_____t
最新回复
(
0
)