首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图3.169所示。运行程序,单击“读数据”按钮,文件中的数据被读入字符串变量中并显示在Label2标签中。单击“排序”按钮时,对读入的数据从小到大排序,并将排序结果显示在窗体的Label4控件中。要求
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图3.169所示。运行程序,单击“读数据”按钮,文件中的数据被读入字符串变量中并显示在Label2标签中。单击“排序”按钮时,对读入的数据从小到大排序,并将排序结果显示在窗体的Label4控件中。要求
admin
2017-09-22
60
问题
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图3.169所示。运行程序,单击“读数据”按钮,文件中的数据被读入字符串变量中并显示在Label2标签中。单击“排序”按钮时,对读入的数据从小到大排序,并将排序结果显示在窗体的Label4控件中。要求:工程文件中已给出部分程序,“读数据”命令按钮的事件过程不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。请编写“排序”命令按钮的事件过程中的部分程序代码。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,两个命令按钮的事件过程必须至少各执行一次。
选项
答案
步骤1:打开考生文件夹中的本题工程文件sjt5.vbla,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: Do While Not EOF(1) s=s & Str(a(i)) 步骤2:在代码编辑窗口指定位置编写以下代码。 参考代码: num=UBound(a) For i=1 To num -1 For j=i To num If a(i)>a(j)Then t=a(i) a(i)=a(j) a(j)=t End If Next Next 步骤3:按
键运行程序,先单击“读数据”按钮,再单击“排序”按钮,最后单击窗体右上角的关闭按钮结束程序。 步骤4:按要求将文件保存至考生文件夹中。
解析
设计思路:在“读数据”按钮的单击事件中,首先使用Do While当型循环结构从文件中读取全部数据,并以Not EOF(文件号)(非文件结尾)作为循环条件,通过Input #语句将打开文件中的数据逐一读出后赋值给a(i),然后将数组连接起来显示在标签中。
在“排序”按钮的单击事件过程中,源程序利用“冒泡法”对记录数组中的元素从小到大进行排序。
转载请注明原文地址:https://kaotiyun.com/show/3jGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
对长度为N的线性表进行顺序查找,在最坏情况下所需要的比较次数为______。
为了清除列表框中的所有内容,应使用的方法是______。
下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整()。PrivateTypeAngKAsInteger
随机文件使用Put语句写数据,使用【】语句读数据。
以下程序代码用来实现如下功能:单击命令按钮弹出对话框,在其中输入正数后单击确定,弹出一个提示信息显示刚才输入的正数,否则提示"error"。请填空。PrivateSubCommand1_Click()DimaAsInteger,bAsSt
如果存在如下过程:PrivateFunctionFun(a()AsInteger)DimFirstAsInteger,LastAsInteger,iAsInteger First=LBound(a) La
如果准备读文件,打开顺序文件“text.dat”的正确语句是
在窗体上面一个命令按钮(其Name属性为Command1),然后编写如下代码:OptionBase1PrivateSubCommand1_Click()Dima(4,4)Fori=
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:PrivateSubCommand1_Click()DimaAsInteger,bAsString,cAsIntegera=1234:
随机试题
子宫内膜不规则脱落的直接发病机制是
有溃疡病者应慎用下列哪种抗高血压药
关于左旋多巴治疗帕金森病的疗效错误的是
一般公共建筑在人流组织上,可归纳为()等方式。
在下列施工区域,应该按照冬期施工要求进行路基施工的是()。
根据《期货公司董事、监事和高级管理人员任职资格管理办法》的规定,下列情形中,不得申请期货公司董事、监事和高级管理人员任职资格的是()。
对于负债的流动性来讲,筹资的能力越强,所付的成本越低,则流动性越()。
关于价值链分析,下面描述正确的有()。
某化妆品厂2008年5月份生产销售情况如下:(1)外购原材料12万元取得专用发票;(2)外购生产用水电支付价款1.59万元,税金0.09万元,取得增值税专用发票;(3)将本月外购材料全部投入生产化妆品销售,销售A化妆品取得销售额615万元;销售B化妆
Sheworkedveryhardandbecameasuccessfulsalesperson______.
最新回复
(
0
)