首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读下面程序代码: Private Sub Command1_Click() Dim temp As Integer a=Array(2,7,4,10,0,1,8,5,3,9,6) For i=7 To 4 Step-1
阅读下面程序代码: Private Sub Command1_Click() Dim temp As Integer a=Array(2,7,4,10,0,1,8,5,3,9,6) For i=7 To 4 Step-1
admin
2018-07-11
27
问题
阅读下面程序代码:
Private Sub Command1_Click()
Dim temp As Integer
a=Array(2,7,4,10,0,1,8,5,3,9,6)
For i=7 To 4 Step-1
For j=3 To i-1
If a(j)>a(j+1)Then
temp=a(j)
a(j)=a(j+1)
a(j+1)=temp
End If
Next j
Next i
For i=0 To 10
Print a(i);
Next i
End Sub
此程序代码运行后的输出是( )。
选项
A、2 7 4 0 1 5 8 10 3 9 6
B、0 1 2 3 4 5 6 7 8 9 10
C、2 7 0 1 4 5 8 10 3 9 6
D、2 7 4 10 0 1 3 5 8 9 6
答案
A
解析
Array函数用来为数组元素赋值,即把一个数据集读入某个数组。本题利用Array函数,将一组整型数据读入到数组变量a中。利用二重For循环对数组中的部分元素进行排序,循环执行过程中,各变量的值如下表所示。
循环结束后数组中各元素的值依次为:(2,7,4,0,1,5,8,10,3,9,6);所以A选项正确。
转载请注明原文地址:https://kaotiyun.com/show/YzFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有以下程序:PrivateSubFormClick()X=50Fori=1To4Y=InputBox("请输入一个整数")y=Val(y)IfyMod5=0Thena=a+yx=yElsea=a
在窗体上画一命令按钮和一文本框,其名称分别为Command1和Text1,然后编写如下程序:FunctionFun(xAsInteger,yAsInteger)AsIntegerFun=IIf(x
以下能够设置控件焦点的方法是
若要清除列表框控件中i的所有列表项,应该使用的方法是
以下关于变量作用域的叙述中,错误的是
设有窗体的FormMouseMove事件过程如下:PrivateSubFormMouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)If(ButtonAnd
以下关于VB的叙述中,错误的是
)为使文本框具有初始值“VB”,在设计阶段正确的操作是
算法的时间复杂度是指
随机试题
CT金属异物伪影的表现是
A.氟化泡沫B.含氟牙膏C.含氟涂料D.氟化饮水E.含氟凝胶近年龋病下降最主要的原因是
以下哪项不属于固定桥的适应证
将出口货物在国内生产和流通过程中已经缴纳的间接税予以抵扣或退还,或者对其应征间接税予以免除,使出口货物以不含税价格进入国际市场的政府行为称为:()
根据《反垄断法》的规定,下列说法正确的是?
下列关于火灾分类对应关系错误的是()。
下列项目中,属于“其他业务成本”科目核算的内容有()。
与bB羽调式宫音相同的调式(即同宫系统调式)是()。
对待职业和岗位,()是爱岗敬业所要求的。
竞争性市场下有3个完全相同的企业生产相同产品。市场的反需求曲线为p(Q)=1-Q,Q=q1+q2+q3,每个企业成本为零。(2016年北京大学国家发展研究院经济学理论)求古诺模型下各企业的利润。
最新回复
(
0
)