首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
若窗体上有一个名为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
34
问题
若窗体上有一个名为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全国计算机二级
相关试题推荐
有如下过程代码:Subvar_dim() StaticnumaAsInteger DimnumbAsInteger numa=numa+2 numb=numb+1 printnuma;numbEndSub连续3次
目录列表框的Path属性的作用是()。
窗体如图l所示。要求程序运行时,在文本框Textl中输入一个姓氏,单击”删除”按钮(名称为Commandl),则可删除列表框Listl中所有该姓氏的项目。若编写以下程序来实现此功能:PrivateSubCommandI_Click()D
在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下程序:FunctionFun(xAsInteger,yAsInteger)AsIntegerFun=IIf(x
以下不属于VisualBasic数据文件的是
窗体上有一个名称为Optionl的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程PrivateSubOptionl_click(IndexAsInteger)EndSub下面关于此过程的参数Index的叙述中正确的是(
在运行阶段,要在文本框Text1获得焦点时选中文本框中所有内容,如图1所示,对应的事件过程是()。
A、各子菜单项组成一个名称为mnu1的控件数组B、不论选中菜单项1、2或3,均执行mnu1_Click事件过程C、Case2分支的语句没有必要,因为该菜单项的"复选"属性已被设置D、程序中的Index是系统自动产生的C菜单项1至菜单项3是名称为m
某完全二叉树共有256个结点,则该完全二叉树的深度为()。
窗体上有名称为Commandl的命令按钮和名称为Text1的文本框PrivateSubCommandl一Click()Text1.Text=“程序设计”Text1.SetFocusEndSubPriv
随机试题
避免正常组织超量的原则,正确的是
免疫复合物介导的血管炎包括
患者,男性,58岁。2天前晚上看电视时,突感右侧肢体麻木,无力,2小时前全身抽搐一次,继之头痛呕吐,送来医院急诊,经检查确诊为脑栓塞。最支持诊断的体征是
根据《立法法》的规定,以下哪些是规章的制定主体?
根据《证券投资基金法》《私募投资基金监督管理暂行办法》和中央编办相关通知要求,中国证券投资基金业协会自()起正式开展私募基金管理人登记、私募基金备案和自律管理工作。
2008年5月,松园劳务派遣有限责任公司(简称“松园公司”)与天利房地产开发有限责任公司(简称“天利公司”)签订劳务派遣协议,将李某派遣到天利公司工作。根据有关法律规定,松园公司与天利公司协商劳务派遣协议的下列条款中,符合法律规定的有()。
有关英国近代教育状况的表述不正确的一项是‘()
最早出现诉讼代理的朝代是()。
在查询设计器的工具栏中有、而在视图设计器中没有的工具按钮是
It’sthefirstquestionparentsaskwhentheirchildisdiagnosedwithautism(自闭症).Willhisfuturebrothersorsistershavea
最新回复
(
0
)