首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click() Dim a(1 To 6)As Integer Dim mini%,i%,j%,n%,t%,k% a(1)=8
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。 Private Sub Form_Click() Dim a(1 To 6)As Integer Dim mini%,i%,j%,n%,t%,k% a(1)=8
admin
2018-09-29
42
问题
下面的程序运行时,单击窗体后,窗体上显示的结果是( )。
Private Sub Form_Click()
Dim a(1 To 6)As Integer
Dim mini%,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
Forj=i+1 To n
Ifa(j)<a(min1)Then mini=j
Nextj
t=a(i):a(i)=a(min1):a(min1)=t
Next i
For i=1 To n
Print a(i)
Nexti
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/rhFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设工程中有2个窗体:Form1和Form2,每个窗体上都有一个名称为Text1的文本框。若希望把Form1上文本框中的内容复制到Form2上的文本框中,应进行的操作是
以下关于菜单的叙述中错误的是
(1)在名称为Forml的窗体上添加一个名称为Commandl的命令按钮,标题为“打开文件”,再添加一个名称为CDl的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框,请按下列要求设置属性和编写代码:①设置适当属性,使对话框的标题为
下列叙述中,错误的是
以下数列:1,1,2,3,5,8,13,21,…的规律是从第3个数开始,每个数是它前面两个数之和。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击“
以下关于VB特点的叙述中,错误的是( )。
下面关于组合框Cb1的叙述中正确的是
设有栈S和队列Q,初始状态均为空。首先依次将A,B,C,D,E,F入栈,然后从栈中退出三个元素依次入队,再将X,Y,Z入栈后,将栈中所有元素退出并依次入队,最后将队列中所有元素退出,则退队元素的顺序为
下列合法的VisualBasic数值变量是
下面不属于软件测试实施步骤的是()。
随机试题
离子色谱法测定氯化物、氟化物等阴离子时,含有机物水样可经过()柱过滤除去。
境内机构或个人逃避外汇管理,将应该结售给国家的外汇私自保存、转移、买卖、使用、存放境外,或将外汇、外汇资产私自携带、托带或邮寄出境的行为是【】
A.浦肯野纤维B.房室交界C.心室肌细胞D.窦房结细胞传导兴奋速度最慢的是
关于模型分析的正确说法是
女,16岁,服敌敌畏30m1.后1小时入院。体检昏迷,脸色苍白,皮肤湿冷,面部肌肉小抽搐,瞳孔缩小,两肺散在湿鸣音,全血胆碱酯酶活力为0。确诊为急性有机磷中毒,先用2%碳酸氢钠溶液洗胃,直到洗出液澄清、无异味为止。同时用阿托品与碘解磷定治疗,8小时后神志
()指的是影响工作场内员工、临时工作人员、合同方人员、访问者和其他人健康和安全的条件和因素。
请认真阅读下列材料.并按要求作答。请根据上述材料完成下列任务:简述小学阶段记忆英语单词的方法有哪些。
公安工作具有广泛的(),尤其不能离开人民群众的支持。
有个偷针者和偷牛者一起被游街,偷针的觉得很委屈:“我只偷了一根针,为什么要和盗牛贼一起游街,太不公平了!”盗牛者却对他说:“别嚷了,我走到这一步是从偷针开始的。”这个寓言故事所告诉我们的道理不包括( )。
ABritishstudyfoundthatBvitaminscouldreducebrainshrinkageinolderpeoplewithmildmemoryloss.ItshowedthatBvitam
最新回复
(
0
)