首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。程序运行时,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入一维数组a中,并按下标顺序将数组a各元素的值显示在List1列表框中;单击“移动"按钮,则将数组a中的最大值移动到数组的最前面,其他
在考生文件夹下有一个工程文件sjt5.vbp。程序运行时,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入一维数组a中,并按下标顺序将数组a各元素的值显示在List1列表框中;单击“移动"按钮,则将数组a中的最大值移动到数组的最前面,其他
admin
2018-09-19
49
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
设列表框的名称为List1,则下列与List1.Text中的值相同的属性值是
在数据库系统中,数据模型包括概念模型、逻辑模型和
下面列表框属性中,是数组的是( )。
设窗体上有2个直线控件Line1和Line2,若使两条直线相连接,需满足的条件是( )。
假定把计时器控件Timer1的Interval属性设置为1000,Enabled属性设置为True,并编写下面的事件过程:PrivateSubTimer1_Timer()DimxAsIntegerFori=1To
表达式Int(5.3)+Int(-5.8)>Fix(5.3)+Fix(-5.8)的值是
(1)在考生文件夹下有一个工程文件Bjt3.vbp,请在窗体上添加两个单选按钮(名称分别为Option1和Option2,标题分别为“添加项目”和“删除项目”),一个列表框(名称为List1)和一个文本框(名称为Text1),如图1所示。编写窗体的Clic
如果要在语句:a=Array(1,2,3,4,5)的前面声明变量a,则正确的声明是
下面描述中不属于数据库系统特点的是
某系统结构图如下图所示该系统结构图的宽度是
随机试题
与痰饮有关的脉象有
割裂物质和意识的关系,在理论上会导致()
A.Hb<90g/LB.Hb<100g/LC.Hb<110g/LD.Hb<120g/LE.Hb<145g/L新生儿贫血标准是
兴奋性突触后电位的形成主要是由于
伴高血压的支气管哮喘发作的首选药是
化学药品标签上有效期的标注格式正确的是
何某为自己3岁的儿子投保一份健康保险,受益人指定是自己的儿子,在这份保险合同中,关系人是( )。
下述情形中,委托方在涉税服务期限内不可单方面终止代理行为的是()。
多年以来,老师已著作等身,那些森林般青翠、幽深的散文,蓊蓊郁郁地,__________了我心底最萧索的季节。她笔下炼过的字,锻过的句,一刀一斧___________一座座关于“生”的雕塑,那种文字不是平面的,而是雕塑一般——固体的、具象的、静默而至美的。填
在VisualFoxPro6.0中,建立查询可用______方法
最新回复
(
0
)