首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。程序运行时,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入一维数组a中,并按下标顺序将数组a各元素的值显示在List1列表框中;单击“移动"按钮,则将数组a中的最大值移动到数组的最前面,其他
在考生文件夹下有一个工程文件sjt5.vbp。程序运行时,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入一维数组a中,并按下标顺序将数组a各元素的值显示在List1列表框中;单击“移动"按钮,则将数组a中的最大值移动到数组的最前面,其他
admin
2018-09-19
47
问题
在考生文件夹下有一个工程文件sjt5.vbp。程序运行时,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入一维数组a中,并按下标顺序将数组a各元素的值显示在List1列表框中;单击“移动"按钮,则将数组a中的最大值移动到数组的最前面,其他数据的排列顺序不变,并将移动后的结果显示在List2列表框中。单击“保存"按钮,则保存移动后的结果。
要求:“显示数据”和“保存”按钮的Click事件过程已经给出,请编写“移动”按钮的Click事件过程实现上述功能。程序窗体界面如图3-45所示。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前必须单击“移动”按钮,并单击“保存”按钮保存结果,否则无成绩。最后程序按原文件名存盘。
选项
答案
步骤1:打开考生文件夹中的工程文件sjt5.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: Private Sub Command2_Click() ’=========考生编写的程序============== Dim n As Integer,s As String Dim i,j As Integer n=0:j=0 For i=1 To 10 If a(i)>n Then n=a(i):j=i End If Next For i=j To 2 Step-1 a(i)=a(i-1) Next a(1) =n For j=1 To 10 List2.AddItem(a(i)) Next i ’============================ End Sub 步骤2:按
运行程序,单击各按钮测试验证。 步骤3:按要求将文件保存至考生文件夹中。
解析
只需要完成“移动”命令按钮的Click事件代码,根据题目要求在点击移动命令按钮,找出数组a的最大值,可以通过循环来查找最大值;接下来把最大值移动到数组的最前面,即把最大值前面的数往后移动一个位置,然后把最大值放到第一个元素位置,移动过程同样通过循环实现;最后一步是通过循环,把数组a的内容添加到List2列表框里面。
转载请注明原文地址:https://kaotiyun.com/show/q9Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面叙述中正确的是
为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:PrivateSubCommand1Click() Dima&,s&,k& s=1 a=2 Fork=2To10
要删除列表框中最后一个列表项,正确的语句是( )。
设有以下过程:PrivateSubproc(xAsInteger,OptionalyAsInteger)Printx,yEndSub针对此过程,下面正确的过程调用语句是
以下关于控件数组的叙述中,正确的是( )。
VB变量x!的数据类型是
下面不属于对象主要特征的是
支持子程序调用的数据结构是( )。
按照“后进先出”原则组织数据的数据结构是
随机试题
A.K+外流B.Ca2+内流C.两者均有D.两者均无(2002年)窦房结细胞动作电位期离子流有
当图示电路的激励电压ui=Uisin(wt+φ)时,电感元件上的响应电压uL的初相位为:
为了达到城市交通发展战略的目标,必须提出的城市交通发展策略包括()
账簿()分为序时账、分类账和备查账。
下列关于约束性预归类的表述正确的是()。
下列关于证券投资基金费用的说法中,正确的有()。Ⅰ.我国证券投资基金的交易费用主要包括交易佣金、开户费、银行汇划手续费等Ⅱ.基金运作费包括审计费、律师费、上市年费、信息披露费、分红手续费等Ⅲ.基金管理人可以依照相关规定从基金财产中持续计提一定
集团法人客户与单一法人客户相比,它的信用风险特征有()。
①说到底,成功是“热爱+坚持”,离不开“虽千万人吾往矣”的勇气和信念②反之,如果一味推崇“出名要趁早”的“人生哲学”,凡事追求一劳永逸的“速成”,稍有起色便沾沾自喜,遇到不顺则自暴自弃,难免会在焦虑中迷失自我③看待成功的心态越理性平和,人生的步履就越容
Somecountriesarebetterthanothersatlookingaftertheenvironment.InEurope,GermanyandnorthernEuropeancountrieswork
Forthispart,youareallowed30minutestowriteashortessayonshapingahealthypersonality.Youressayshouldincludethe
最新回复
(
0
)