首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名为Command1的命令按钮,并有下面的程序: Private Sub Command1_Click() Dim arr(5)As Integer For k=I To 5 art(k)=k Next
窗体上有一个名为Command1的命令按钮,并有下面的程序: Private Sub Command1_Click() Dim arr(5)As Integer For k=I To 5 art(k)=k Next
admin
2020-02-27
19
问题
窗体上有一个名为Command1的命令按钮,并有下面的程序:
Private Sub Command1_Click()
Dim arr(5)As Integer
For k=I To 5
art(k)=k
Next k
prog art()
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 i=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。Llbound函数返回数组可用的最大下标,过程prog的功能是遍历数组对数组中的元素进行排序,由条件a(j)
转载请注明原文地址:https://kaotiyun.com/show/tFTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据库系统中完成查询操作使用的语言是()。
某系统结构图如下图所示(n≥5)该系统结构图的最大扇出数是()。
(1)在考生文件夹下有工程文件sjt3.vbp,其窗体上有1个标题为“计算”的命令按钮,1个标题为“无理数e的近似值”的标签。请再画1个初始内容为空的文本框Textl,如下左图所示。程序功能为:单击“计算”命令按钮,则计算无理数e的近似值,并将结果显示在T
(1)在名称为Form1的窗体上添加三个单选按钮,其名称分别为Option1、Option2和Option3(如图1所示),然后通过属性窗口设置窗体和单选按钮的属性,实现如下功能:①窗体标题为“设置单选按钮属性”;②三个单选按钮的标题分别为“按钮1”
设已经在菜单编辑器中设计了弹出式菜单mnuStyle,要求程序运行时,当用户在文本框Textl上单击鼠标右键时,能够弹出该菜单,则应使用的事件过程是()。
下列叙述中正确的是()。
(1)在名称为Forml的窗体上画1个名称为Framel、标题为“学位”的框架;框架内有1个名称为Optionl的控件数组,该控件数组含有4个标题分别为“学士”、“硕士”、“博士”和“其他”的单选按钮,它们的Index属性分别为0、1、2、3,且标题为“硕
关系数据模型的三个组成部分中不包括()。
一个工作人员可以使用多台计算机,而一台计算机可被多个人使用,则实体工作人员与实体计算机之间的联系是( )。
表达式4+5\6*7/8Mod9的值是()。
随机试题
治疗胃阴不足型呃逆,可选
急性肝细胞损伤时最敏感的指标是
A.面神经B.动眼神经C.滑车神经D.外展神经E.三叉神经下直肌的支配神经为
脑膜刺激征包括()
住房公积金委员会各项决策的执行机构是()。
某管网设有对置水塔,当管网用水最小时,泵站供水量为70L/s,节点流量如图1—13所示,则节点1转输到水塔的流量q1-t为()。
乙股份有限公司(以下简称乙公司),属于增值税一般纳税人,适用的增值税税率为17%。乙公司2013年至2015年与固定资产有关的业务资料如下:资料一:2013年12月1日,乙公司购入一条需要安装的生产线,取得的增值税专用发票上注明的生产线价款为1000万元
筹资决策的关键是决定各种资金来源在总资金中所占的比重,以使筹资风险和筹资成本相配合。()
阅读以下文字,完成问题。当理性精神在北中国节节胜利,从孔子到荀子,从名家到法家,从铜器到建筑,从诗歌到散文,都逐渐摆脱巫术宗教的束缚突破礼仪旧制的时候,南中国由于原始氏族社会结构有更多的保留和残存,依旧强有力地保持和发展着远古传统,依然弥漫在奇异
Lookatthenotesbelow.Someinformationismissing.Youwillhearapresentationaboutaholidaytourcompany.Foreac
最新回复
(
0
)