首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。 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
70
问题
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。
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全国计算机二级
相关试题推荐
编写如下程序:OptionBase1PrivateSubCommandl_Click()Dimaa:Array(1,2,3,4)S=0:j=1
有下面程序代码:PrivateSubCommand1_Click()DimkAsIntegerFork=1To3Callfun(k)NextkFork=1To3
为了实现对象的自动拖放,应该设置该对象的一个属性。下面设置中正确的是
设有如下事件过程:PrivateSubForm_Click()x=0Whilex10x=x+1x=x*xWendPrintxEndSub运行程
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。在横线处应填写()。PrivateSubCommand1_Click()DiminDataAsString
窗体上有1个名称为Picture1的图片框,能将图片文件d:\vb\flower6.jpg正确装入图片框的语句为
下列关于菜单项的描述中,错误的是
设a=2,b=3,C=4,d=5,下列表达式的值是()。a>bAndCc
以下关于过程及过程参数的描述中,错误的是()。
随机试题
患者,女性,11岁。逐渐出现右侧肢体活动障碍,行走不稳,向右侧偏斜,饮水呛咳,并出现吞咽困难10个月。查体:左侧眼部以下面纹变浅,口角向右侧抬高。悬雍垂向右侧偏斜,双侧咽腭反射迟钝。右侧肢体肌力4级,肌张力稍高。头颅CT示后颅窝高密度圆形阴影,其内可见分层
由HLA抗体引起的输血反应,最常见的是
患儿,男,10个月。患急性上呼吸道感染,体温:39.8℃。此时对患儿最主要的护理措施是
学龄期起于( )。
桑枝的功效是威灵仙的功效是
临时避难层应设()和()。
A注册会计师负责审核L公司为申请发行股票而编制的2005年度盈利预测和内部控制的审核,L公司系生产润滑油的企业,由于近来国际市场和国内市场的油价和销售情况普遍不稳定,但是公司的管理层对上市充满信息,假定不考虑其他因素的影响,请依据《独立审计实务公告—第4号
Whatcausedthedeathof20Israelisaweekago?
[A]Weapplyforcreditformanyreasons—maybeit’stobuyanewcar,house,computer,orgetastudentloan.However,thatthere
Domesticviolenceisaseriouscrimecausingserioussocialproblems.Itisviolenceathome,usuallythehusbandbeatinghiswi
最新回复
(
0
)