首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click() Dim a(1To6)As Integer Dim min1%,i%,j%,n%,t%,k% a(1)=8:a(2)=6:a(3)=9:a(4
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click() Dim a(1To6)As Integer Dim min1%,i%,j%,n%,t%,k% a(1)=8:a(2)=6:a(3)=9:a(4
admin
2017-03-26
68
问题
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。
Private Sub Form_Click()
Dim a(1To6)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=1To n-1
min1=i
For j=i+1Ton
If a(j)<a(min1)Then min1=j
Next j
t=a(i):a(i)=a(min1):a(min1)=t
Next i
For i=1Ton
Printa(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/41Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
通过文本框的()属性可以获得当前插入点所在的位置。
设x=4,y=6,则以下不能在窗体上显示出“a=10”的语句是______。
单击一次命令按钮之后,在对话框中输入12,2,34,.23,窗体中的输出结果为______。PrivateSubCommand1_Click()a=10:b=20:c=30Callcheck(a,
在VisualBasic中按文件的编码方式不同,可将文件分为
假定有一个菜单项,名为Menultem,为了在运行时使该菜单项失效(变灰),应使用的语句为
建立打开文件、保存文件、颜色、字体、打印对话框所使用的方法分别为【】、【】、ShowColor、ShowFont和ShowPrinter。
属性窗口分为4个部分,这4个部分分别是______。
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程: PrivateSubCommand1_Click() n=Val(Text1.Text) Fori=2Ton Forj
下列叙述中,不属于软件需求规格说明书作用的是
以下程序的功能是:从键盘上输入若干个数字,当输入负数时结束输入,统计出若干数字的平均值,输出结果。请填空。PrivateSubForm_click()Dimx,yAsSingleDimzAsIntegerx=InputBox("
随机试题
用未来预期收益折算来反映整体资产的现实价值,用预期使用年限和功能来评估某类资产的价值,体现的是资产评估的()
为确定尿道损伤的病理类型,最好的检查方法是()
专利权终止的情况有()。
某建设工程项目分包工程发生生产安全事故,负责向安全生产监督管理部门、建设行政主管部门或其他有关部门上报的是()。
下列对模板式制单软件的表述,正确的是()。
企业针对职工的体检计划属于( )计划。
下列有关刑事诉讼中回避制度的表述,正确的是()。
在经济较快增长的同时实现节能环保额目标,主要途径就是推进节能减排技术开发,节能减排技术开发具有较强的外部经济性,需要贯彻“以企业为主体,以政府为主导”的原则,而且政府引导必须先行。政府的当务之急是推进节能减排产业化进程,为企业创造必要的市场空间:通过完善政
①然而哲学家罗素对康德不无讽刺地说,这只是一个出生在柯尼斯堡(康德的家乡)平原的人的想法,一个出生在阿尔卑斯山区的人就不会这样想②牛顿和康德都持有一种绝对空间的观念③但这些事物与空间无关,对空间不产生影响,其实这是一种绝对的虚空观④牛顿说,绝对的空间
Sometimeago,aninterestingdiscoverywasmadeby【C1】______ontheAegeanislandofKea.AnAmericanteamexploredatemplewhi
最新回复
(
0
)