首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
若窗体上有一个名为Command1的命令按钮,并有下面的程序: Private Sub Command1_Click() Dim arr(5)As Integer For k=1 To 5 arr(k)=k Next k prog
若窗体上有一个名为Command1的命令按钮,并有下面的程序: Private Sub Command1_Click() Dim arr(5)As Integer For k=1 To 5 arr(k)=k Next k prog
admin
2020-02-27
25
问题
若窗体上有一个名为Command1的命令按钮,并有下面的程序:
Private Sub Command1_Click()
Dim arr(5)As Integer
For k=1 To 5
arr(k)=k
Next k
prog arr()
For k=1 To 5
Print arr(k);
Next k
End Sub
Sub prog(a()As Integer)
n=UBound(a)
For i=n To 2 step-1
For j=1 To n-1
if a(j)
t=a(j):a(j)=a(j+1):a(j+1)=t
End If
Next j
Next i
End Sub
程序运行时,单击命令按钮后显示的是( )。
选项
A、1 2 3 4 5
B、5 4 3 2 1
C、0 1 2 3 4
D、4 3 2 1 0
答案
B
解析
程序对数组元素赋初值为1、2、3、4、5。Ubound函数返回数组可用的最大下标,过程prog的功能是遍历数组对数组中的元素进行排序,由条件a(j)
转载请注明原文地址:https://kaotiyun.com/show/iPTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下事件过程: PrivateSubCommandl_Click()Dimaa=Array(12,3,8,5,10,3,5,9,2,4)Fork=lTo9Printfun(a(k一1),
关于MDI窗体下列说法正确的是()。
使用Line控件在窗体上画一条从(0,0)到(600,700)的直线,则其相应属性的值应是( )。
在运行阶段,要在文本框Textl获得焦点时选中文本框中所有内容,如图l所示,对应的事件过程是()。
面向对象方法中,继承是指( )。
假定有以下两个过程:SubS1(ByValxAsInterger,ByValyAsInterge()DimtAsIntergert=x:x=y:y=tEndSubSubS2(xAsInterger,y
窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下:PrivateSubForm_Load() Shape1.Top=0 Timer1.Interval=100
窗体上有一个名称为Optionl的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程PrivateSubOptionl_click(IndexAsInteger)EndSub下面关于此过程的参数Index的叙述中正确的是(
窗体上有名称为Command1的命令按钮和名称为Text1的文本框PrivateSubCommand1_Click()Text1.Text="程序设计"Text1.SetFocusEndSubPrivateSubText1_GotF
在面向对象方法中,不属于“对象”基本特点的是()。
随机试题
求微分方程满足初始条件y|x=0=2,y’|x=0=一1的特解.
dx)∫0xt2dt=().
绘画作品:《清明上河图》
下列哪一项是重症肺炎的主要确定依据
男,55岁。反复不规则胃胀痛3年,胃镜诊断为萎缩性胃窦炎。临床疑有胃炎引起的上消化道出血,为确诊,合适的诊断方法是
燃气系统附属设备主要有()。
穿越铁路的燃气管道应在套管上装设()。
洋流是大规模流动的海水,对全球的热量平衡起着重要作用。读下图回答问题。为什么在有些大陆沿岸海区会发生上升流现象?右图所示的①②③④四海区中最可能出现上升流的是哪一海区?
依法治国是中国共产党领导人民治国的基本方略。()
SciencewriterTomStandagedrawsaptparallelsbetweenthetelegraphandthegemoflate20th-centurytechnology,theInternet.
最新回复
(
0
)