首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm),其功能是通过调用过程Sort将数组进行降序排序。程序运行后,分别向四个文本框中各输入一个整数(如图1所示),然后单击命令按钮,即可使数组按降序排序,并显示在文本框中(如图2
在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm),其功能是通过调用过程Sort将数组进行降序排序。程序运行后,分别向四个文本框中各输入一个整数(如图1所示),然后单击命令按钮,即可使数组按降序排序,并显示在文本框中(如图2
admin
2016-06-30
46
问题
在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm),其功能是通过调用过程Sort将数组进行降序排序。程序运行后,分别向四个文本框中各输入一个整数(如图1所示),然后单击命令按钮,即可使数组按降序排序,并显示在文本框中(如图2所示)。这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。
选项
答案
步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Option Base 1 Private Sub Sort(a()As Integer) Dim Start As Integer,Finish As Integer Dim i As Integer,j As Integer,t As Integer ’Start=?(a) Tinish=?(a) ’For i=?To 2 Step一1 ’For j=1 To? ’If a(j)?a(j+1)Then t=a(j+1) a(j+1)=a(j) a(j)=t End If Next j Next i End Sub Private Sub Commandl_Click() Dim arr1 Dim art2(4)As Integer arr1=Array(Val(Text1.Text),Val(Text2.Text),Vaj (Text3.Text),yal(Text4.Text)) For i=1 To 4 art2(i)=CInt(arrl(i)) Next i Sort art2() Text1.Text=an2(1) Text2.Text=an2(2) Text3.Text=arr2(3) Text4.Text=arr2(4) End Sub 程序结束 第1个?处填入:LBound 第2个?处填入:UBound 第3个?处填入:4 第4个?处填入:3 第5个?处填入:< 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
Array(arglist)函数用于返回一个以arglist参数中用逗号隔开的值为元素的数组。UBound函数用于返回数组某一维的最大下标(上界),LBound函数用于返回数组某一维的最小下标(下界)。
在本题Sort过程中,源程序利用一个嵌套的For循环对数组a中的元素按从大到小进行排序。
转载请注明原文地址:https://kaotiyun.com/show/ivLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的执行结果为()。A=0:B=1A=A+B:B=A+B:PrintA:BA=A+B:B=A+B:PrintA:BA=A+B:B=A+B:PrintA:B
下列各选项说法错误的一项是
当循环队列非空且队尾指针等于队头指针时,说明循环队列已满,不能进行人队运算,这种情况称为______。
为启动定时器控件,需要设置定时器的属性是()。
编写如下事件过程:PrivateSubForm-MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfShift=6AndButton=2T
在窗体上用复制、粘贴的方法建立了一个命令按钮数组,数组名为M1。设窗体Form1标题为“myform1”,双击控件数组中的第3个按钮,打开代码编辑器,写下如下代码:PrivaeSubM1_Click(IndexAsInteger)F
设A="123456",则表达式Val(Left(A,4)+Mid(A,4,2))的值为
设s="中华人民共和国",表达式Left(S,1)+Right(S,1)+Mid(S,3,2)的值为()。
A=7,B=3,C=4,则表达式AMOD3+B^3/C\5的值为______。
设a=5,b=4,c=3,d=2,则表达式3>2*bOra=cAndb<>cOrc>d的值是
随机试题
关于学习领导科学的意义,说法错误的是【】
下列对建设项目环境风险评价的工作流程的描述,顺序正确的是()。
下列有关投资的说法,错误的是()。
建立城镇职工基本医疗保险制度的原则是( )。
根据刑事诉讼法的规定,合议庭对复杂重大案件,可以提请院长决定将案件提交审判委员会讨论。合议庭提请院长将案件提交审判委员会讨论的时间应是在()。
万紫干红的奇花异卉,不仅美化着人们的生活环境,陶冶着人们的情操,而且还具有较高的药用价值。下列选项关于花卉药用价值的叙述,不正确的是()。
近年来,同家在重大建设项目招标采购等领域,__________了一系列政策,鼓励提高国产化水平,规定相关产品的“国产化率”(即国内生产率)必须达到一定指标,才能参与重大建设项目__________,并享受进口部件退税优惠。填入横线部分最恰当的一项是
Hesufferedfrom____________________.
TrustMe,I’maRobot[A]Withrobotsnowemergingfromtheirindustrialcagesandmovingintohomesandworkplaces,roboticists
Thepassagegivesageneraldescriptionofthewaystopreparefortests.Simplyscanningovertextbooksornotesisnotenough
最新回复
(
0
)