首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图所示。运行程序,单击“读数据”按钮,读入文件中的数据到字符串变量中并显示在Labe12标签中。单击“排序”命令按钮时,对读入的数据从小到大进行排序,并将排序结果在窗体的Labe14控件中显示。
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图所示。运行程序,单击“读数据”按钮,读入文件中的数据到字符串变量中并显示在Labe12标签中。单击“排序”命令按钮时,对读入的数据从小到大进行排序,并将排序结果在窗体的Labe14控件中显示。
admin
2018-12-20
68
问题
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图所示。运行程序,单击“读数据”按钮,读入文件中的数据到字符串变量中并显示在Labe12标签中。单击“排序”命令按钮时,对读入的数据从小到大进行排序,并将排序结果在窗体的Labe14控件中显示。
要求:工程文件中已给出部分程序,“读数据”命令按钮的事件过程不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。请编写“排序”命令按钮的事件过程中的部分程序代码。
注意:不能修改程序的其他部分和控件属性,最后将修改后的文件按原文件名进行存盘。程序调试通过后,两个命令按钮的事件过程必须至少各执行一次。
选项
答案
步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。 For i=1 To 10 ’循环比较大小实现排序 f=True’设置标签 For j=1 To 9 If a(j)>a(j+1)Then’相邻两数比较将最小值放前面 t=a(j) a(j)=a(j+1) a(j+1) =t f=False’当有交换就置标签为假 End If Next j If f Then’如果上次循环没有交换数据,则证明序列已排序好,则f为真退出循环 Exit For End If Next i 步骤3:调试并运行程序,关闭程序后按题目要求存盘,如图3.34。 [*]
解析
在“读数据”按钮的单击事件过程中,用Open语句以Input方式打开数据文件in5.txt,在For循环语句和Do While语句中用Input#语句依次读出10个值并赋值给数组元素a(i)。在“排序”按钮的单击事件过程中,利用“冒泡法”对数组中的元素按从小到大进行排序。在“排序”按钮的单击事件过程中,利用For循环语句逐一将数组中各元素按顺序显示在文奉框中,最后通过调用过程Save将文本框中的内容写入数据文什out5.txt。
转载请注明原文地址:https://kaotiyun.com/show/kfFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设x为一整型变量,且情况语句的开始为:SelectCasex,则不符合语法规则的Case子句是( )。
命令按钮Command1的单击事件过程如下:PrivateSubCommand1_Click() Dima(10,10)AsInteger x=0 Fori=1To3 Forj=1To3 a(i,j
设窗体文件中有下面的事件过程:PrivateSubCommand1_Click() Dims a%=100 PrintaEndSub其中变量a和s的数据类型分别是( )。
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:PrivateSubCommand1_Click() s=0 Fori=1To15 x=2*i-1 IfxMod
以下关于窗体的叙述中错误的是( )。
设在窗体上有一个名称为Check1的复选框数组,并有以下事件过程:PrivateSubCheck1_Click(IndexAsInteger) …EndSub则下面叙述中错误的是( )。
为了使标签控件在显示其内容时不覆盖其背景内容,需进行设置的属性为( )。
随机试题
在Excel2010工作表中,A1单元格输入“49”后再将单元格格式设定为“数字分类”为中的“百分比”,则单元格显示内容为_________。
A.卫生知识及格率B.健康教育覆盖率C.不良行为转变率D.卫生保健活动参与率E.健康教育活动的自愿参与率反映人群对卫生保健工作态度的指标是
中孕期超声可发现的胎儿畸形有:①无脑儿;②脑积水;③脊柱裂;④脐疝
下列哪项不属于医院内感染
甲区A公司将位于丙市价值5000万元的写字楼转让给乙区的B公司。后双方发生争议,经丁区人民调解委员会调解达成协议:B公司在1个月内支付购房款。双方又对该协议申请法院作出了司法确认裁定。关于本案及司法确认的表述,下列哪些选项是不正确的?(2013年卷三83题
一种样品若没有标明是参考样品还是标准样品,应看做为______。
下列关于契税税收优惠的表述,正确的是()。
甲企业是增值税一般纳税人,向乙商场销售服装1000件,每件不含税价格为80元。由于乙商场购买量大,甲企业按原价7折优惠销售,乙商场付款后,甲企业为乙商场开具的发票上“金额”栏分别注明了销售额和折扣额,则甲企业此项业务的增值税销项税额是()元。
第二次世界大战后,国际关系最大的变化是()。
EarthquakesInfluenceonthePlanetTheyapproachthetopiccarefully,waryofsoundingmerciless,awarethatthegeologyth
最新回复
(
0
)