首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下有工程文件sjt5.vbp和数据文件in5.txt。in5.txt中有多条记录,每条记录占一行,含4个数据项,数据项的含义依次是:姓名、数学成绩、语文成绩、英语成绩。窗体上按钮“读取数据”的功能是把in5.txt中的所有记录读到数组a中(每个数
考生文件夹下有工程文件sjt5.vbp和数据文件in5.txt。in5.txt中有多条记录,每条记录占一行,含4个数据项,数据项的含义依次是:姓名、数学成绩、语文成绩、英语成绩。窗体上按钮“读取数据”的功能是把in5.txt中的所有记录读到数组a中(每个数
admin
2018-05-08
49
问题
考生文件夹下有工程文件sjt5.vbp和数据文件in5.txt。in5.txt中有多条记录,每条记录占一行,含4个数据项,数据项的含义依次是:姓名、数学成绩、语文成绩、英语成绩。窗体上按钮“读取数据”的功能是把in5.txt中的所有记录读到数组a中(每个数组元素中有一条记录);按钮“排序"的功能是按总分从大到小排序,结果仍放在数组a中;按钮“保存”的功能是存盘,其代码已经给出,不能修改。请将事件过程中的注释符去掉,把?改为正确的内容,并编写“排序”按钮的事件过程。
注意:考生不得修改窗体文件中已经存在的控件和程序,必须运行程序,并依次按下“读人数据”、“排序”、“保存”按钮,否则无成绩,最后将程序按原文件名存盘。
选项
答案
步骤1:打开本题项目工程。 步骤2:分析并编写代码程序。 程序提供代码 Private Sub Commandl一Click() Open App.Path 8L”\in5.txt”For Input As#1 k=1 Do While Not EOF(?) Input#1,a(k).name,a(k).Math,a(k).Chi nese,a(k).English k=k+1 Loop Close#1 aura=? End Sub Private Sub Command2_Click() ’==================考生编写========= ’=================================== End Sub 程序结束 参考答案 第1个?处填入:1 第2个?处填入:k 考生编写部分填: Dim temp As rec Dim i,j As Integer For i=1 To num For j=1 To num—i If sum(j)<sum(j+1)Then temp=a(j) a(j)=a(j+1) a(j+1)=temp End If Next j Next i 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
利用冒泡排序法对数组中的元素进行排序,冒泡排序法的算法思想为:对数组中n个元素按照升序或降序进行排列。利用循环结构对数组中相邻的两个元素进行比较,如果第i项小于第i+1项,则进行交换。这样经过n一1趟,便可以将数组中的元素排序完毕。
转载请注明原文地址:https://kaotiyun.com/show/xvGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下关系表:则下列操作中正确的是
有两个关系R和S如下:则由关系R得到关系S的操作是
在关系数据库中,用来表示实体间联系的是
在数据库系统中,用户所见的数据模式为
下列叙述中正确的是
数据库系统在其内部具有3级模式,用来描述数据库中全体数据的全局逻辑结构和特性的是()。
下列叙述中,不属于软件需求规格说明书的作用的是()。
下面关于多重窗体的叙述中,正确的是()。
下列数据结构中,能够按照“先进后出”原则存取数据的是()。
随机试题
回火件装炉前需将工件表面尽量清洗干净,并检查工件是否有碰伤、裂纹等。()
人们看书时,用红笔画出重点,便于重新阅读,是利用知觉的()
血中哪一种物质增多会促进红细胞集
小柴胡汤倍生姜,去人参、甘草,再加以下哪几味药,即为大柴胡汤的药物组成
35kg小儿的体表面积为
患者,男,30岁。慢性肝炎5年。最近体检发现脾大,肝大,肝功能损害,白细胞4×109/L。为确诊是否有门脉高压,最有意义的检查是
尤善治风湿痹证属下部寒湿者的药物是
反映医患之间权利关系的正确观点是
新课程的核心理念是()
Whendoessleepwalkingusuallyoccur?Measuresshouldbetakento
最新回复
(
0
)