首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下有工程文件sjt5.vbp和数据文件in5.txt。in5.txt中有多条记录,每条记录占一行,含4个数据项,数据项的含义依次是:姓名、数学成绩、语文成绩、英语成绩。 窗体上按钮“读取数据”的功能是把in5.txt中的所有记录读到数组a
考生文件夹下有工程文件sjt5.vbp和数据文件in5.txt。in5.txt中有多条记录,每条记录占一行,含4个数据项,数据项的含义依次是:姓名、数学成绩、语文成绩、英语成绩。 窗体上按钮“读取数据”的功能是把in5.txt中的所有记录读到数组a
admin
2019-05-14
51
问题
考生文件夹下有工程文件sjt5.vbp和数据文件in5.txt。in5.txt中有多条记录,每条记录占一行,含4个数据项,数据项的含义依次是:姓名、数学成绩、语文成绩、英语成绩。
窗体上按钮“读取数据”的功能是把in5.txt中的所有记录读到数组a中(每个数组元素中有一条记录);按钮“排序”的功能是按总分从大到小排序,结果仍放在数组a中;按钮“保存”的功能是存盘,其代码已经给出,不能修改。
请将事件过程中的注释符去掉,把“?”改为正确的内容,并编写“排序”按钮的事件过程。
注意:考生不得修改窗体文件中已经存在的控件和程序,必须运行程序,并依次按下“读入数据”、“排序”、“保存”按钮,否则无成绩,最后将程序按原文件名存盘。
选项
答案
【操作步骤】 Do While Not EOF(1) num=k-1 Private Sub Command2 C1iCk() ’=========考试编写============== Dim k As Integer,j As Integer Dim temp As rec For i=1 To num-1 k=i For j=i+1 To num If sum(k) < sum(j)Then k=j End If Next j temp=a(i):a(i)=a(k) a(k)=temp Next i For k=1 To hum Print a(k).name;a(k).Math; a(k).Chinese;a(k).English Next k ’============================= 步骤2:按
键运行程序,单击各个按钮测试验证。 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/XHUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计visualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFF&
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个标签,名称为L1,标题为“业余爱好”,再画一个名称为Chl的复选框数组,含三.个复选框,它们的Index属性分别为0、1、2,标题依次为
下列程序段中没有错误的是()。
函数调用:String(n,"str")的结果是()。
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是()。
数据库(DB)、数据库系统(DBS)和数据库管理系统(DBMS)之间的关系是()。
下面描述中不属于数据库系统特点的是
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
在名称为Form1的窗体上添加一个名称为Label1,标题为“口令”的标签;添加一个名称为Text1的文本框;再添加三个命令按钮,名称分别为Command1、Command2、Command3,标题分别为“显示口令”、“隐藏口令”、“重新输入”。程序运行
随机试题
公曰:“何患社鼠哉?”何:
分离霍乱弧菌应选择的培养基是
眼内木屑属于
患者,男,46岁。面部隐疹3天,其肿宣浮,患部皮色不变,走注甚速,伴恶风,头痛,舌淡红苔薄白,脉浮。其致病邪气是
下列各项,关于高血压病的叙述,错误的是()
根据《环境影响评价技术导则一总纲》,方案比选的重点是从()等方面比选。
按《建筑工程施工质量验收统一标准》规定,不属于建筑安装工程的分部工程是()。
A公司2004年度的会计报表于2005年2月2日编制完成,注册会计师完成审计及签署审计报告的日期是2005年4月2日,经董事会批准报表对外公布日是4月10日,股东大会召开的日期是4月25日,则资产负债表日后事项涵盖的期间应为()。
某市一高尔夫球具生产企业(增值税一般纳税人)2021年9月1日以分期收款方式销售一批球杆,价税合计为135.6万元,合同约定客户于9月5日、11月5日各支付50%价款;9月5日按照约定收到50%的价款,但并未给客户开具发票。已知高尔夫球具消费税税率为10%
某公司检验科为使相关的管理部门及时掌握产品实现过程中的质量状况、评价和分析质量控制的有效性,把检验获取的数据和信息,经汇总、整理、分析后写成报告,为管理层进行质量决策提供重要信息和依据。质量报告的主要内容包括重大质量问题的()意见。
最新回复
(
0
)