首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。程序运行时,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入一维数组a中,并按下标顺序将数组a各元素的值显示在List1列表框中;单击“移动"按钮,则将数组a中的最大值移动到数组的最前面,其他
在考生文件夹下有一个工程文件sjt5.vbp。程序运行时,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入一维数组a中,并按下标顺序将数组a各元素的值显示在List1列表框中;单击“移动"按钮,则将数组a中的最大值移动到数组的最前面,其他
admin
2018-09-19
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 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全国计算机二级
相关试题推荐
设有数组声明:Dims(2,3),下面错误的程序段是
标准模块中有如下程序代码:PublicxAsInteger,yAsIntegerSubvar_pub() x=10∶y=20EndSub在窗体上有1个命令按钮,并有如下事件过程:PrivateSubCommand1_Clic
下面关于数组声明:Dimarr()AsInteger的叙述中正确的是
下面可以实现此功能的程序是( )。
假定把计时器控件Timer1的Interval属性设置为10,Enabled属性设置为True,并编写下面的程序:DimxAsIntegerPrivateSubTimer1_Timer()Fori=1To100
(1)在考生文件夹下有一个工程文件Bjt3.vbp,请在窗体上添加两个单选按钮(名称分别为Option1和Option2,标题分别为“添加项目”和“删除项目”),一个列表框(名称为List1)和一个文本框(名称为Text1),如图1所示。编写窗体的Clic
下列叙述中正确的是
窗体上有一个名称为Text1的文本框,一个名称为Combo1的组合框。将文本框中的内容添加到组合框中所使用的命令是
下面不属于软件设计阶段任务的是
下列关于算法复杂度叙述正确的是
随机试题
在静息状态海平面呼吸空气条件下,诊断呼吸衰竭的指标之一是PaO2值
以下关于双缩脲法测定总蛋白的说法错误的是
对含氟牙膏的防龋效果进行研究。将若干名学生随机分成两组,一组用含氟牙膏,另一组用普通牙膏,3年后观察其防龋效果。这种研究方法为
影响地面水水质最主要的因素是
3.4g/dl,WBC27170个/μl,中性粒细胞0.875,血小板62000个/μl。B超:子宫前位4.0cm×4.2cm×3.1cm,内膜0.4cm,双卵巢3cm×2cm×2cm,多泡,最大径0.8cmC,宫颈黏液结晶会看到
在下列患者中,护士在书写交班报告时首先应写
在建设项目信息管理中,要求对有关信息的分类进行统一,这体现了信息管理应遵循的()原则。
在国际上,施工企业项目经理是()
手提式灭火器宜设置在灭火器箱内或挂钩、托架上,其顶部离地面高度不应大于()m。
Thebenefitsofquittingsmoking—reducedriskofcancerandmanyotherhealthproblems—areknown.Butformillionsofsmokers,t
最新回复
(
0
)