首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。程序运行时,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入一维数组a中,并按下标顺序将数组a各元素的值显示在List1列表框中;单击“移动”按钮,则将数组a中的最大值移动到数组的最前面,其他
在考生文件夹下有一个工程文件sjt5.vbp。程序运行时,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入一维数组a中,并按下标顺序将数组a各元素的值显示在List1列表框中;单击“移动”按钮,则将数组a中的最大值移动到数组的最前面,其他
admin
2017-10-27
57
问题
在考生文件夹下有一个工程文件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 i=1 To 10 List2.AddItem(a(i)) Next i ’==================================== End Sub 步骤2:按
运行程序,单击各按钮测试验证。 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/NVGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要把一个命令按钮设置成无效,应设置属性______的值为False。
数据库保护分为:安全性控制、【】、并发性控制和数据的恢复。
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:PrivateSubCommand1_Click()S=0Fori
以下叙述正确的是
VisualBasic根据计算机访问文件的方式将文件分成3类,其中不包括()。
下面()语句执行后,窗体Forml从内存退出。
下列程序是用来计算1+2+3+…+10的程序段,请补充完整该程序。Dimi,s,kAsIntegers=0:k=0For______To-1k=k+1s=s+kNextiPr
能够将文本框控件隐藏起来的属性是______。
软件测试的目的是()。
要获得文件列表框中当前被选中的文件的文件名,则应使用哪个属性______。
随机试题
A.伸膝障碍B.踝背伸、外翻功能障碍C.踝跖屈、内翻功能障碍D.伸踝障碍E.足趾跖屈障碍胫神经损伤
水蛭与虻虫均具有的功效是
注意衰退包括()等表现。
接力跑比赛中,一名运动员在完成交接棒时身体在接力区外,棒在里,可以判运动员犯规。()
2017年二季度与三季度相比较,三季度销售额约增长了:
A、 B、 C、 D、 B
随着淡水供应已达极限,五大洲50多个国家或许很快就将因争夺水资源而发生冲突,除非他们就如何分享流经国际边界的河流迅速达成协议。目前全球各地都在谈论夺水战争,2001年3月,联合国秘书长安南说,“对淡水的激烈争夺很可能成为未来冲突和战争的根源,美国
A.briefB.entriesC.intoA.beclassified【T1】______fourtypesB.【T2】______formofweblogC.【T3】______onablogare
A.Idon’tknowwhichoneisthebestforhim.B.I’lltakeone.C.yoursonwillenjoyplayingwithit.A:Goodmorning,sir.W
我常常听人说,他想读一点书,苦于没有时间。我不太同意这种说法。不管他是多么忙,他总不至于忙得一点时间都抽不出来。一天当中如果抽出一小时来读书,一年就有365小时,十年就有3650小时,积少成多,无论什么研究都会有惊人的成绩。零碎的时间最可宝贵,但也最容易丢
最新回复
(
0
)