首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下的工程文件sjt5.vbp中的窗体如图1-215所示。考生文件夹下的随机文件in5.dat中有20条记录,每条记录含姓名和三个分数(均为100以内的正整数)。在程序中已经定义了类型Recordtype,此类型变量可以存放一条记录。要求如下: ①
考生文件夹下的工程文件sjt5.vbp中的窗体如图1-215所示。考生文件夹下的随机文件in5.dat中有20条记录,每条记录含姓名和三个分数(均为100以内的正整数)。在程序中已经定义了类型Recordtype,此类型变量可以存放一条记录。要求如下: ①
admin
2010-09-02
66
问题
考生文件夹下的工程文件sjt5.vbp中的窗体如图1-215所示。考生文件夹下的随机文件in5.dat中有20条记录,每条记录含姓名和三个分数(均为100以内的正整数)。在程序中已经定义了类型Recordtype,此类型变量可以存放一条记录。要求如下:
①请为“计算最大最小值”按钮编写Click事件过程,其功能是:读取文件中的记录,计算每人的总分,找出其中最大总分和最小总分,分别放入变量maxval,minval中(这两个变量已经给出,不得修改)。
②运行程序,单击“计算最大最小值”按钮后再单击“存盘”按钮。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须依次单击“计算最大最小值”、“存盘”按钮,否则无成绩。最后,程序按原文件名存盘。
选项
答案
【操作步骤】 步骤l:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口的适当位置编写代码。 参考代码: Private Sub Commandl_Click() Dim S As Recordtype Open"in5.dat"For Random As#1 Len= Len(S) maxval=0 minval=300 For k=1 To 20 Get#1,,S sumval=s.a1+s.a2+s.a3 If sumval>maxval Then maxval= sumval If sumval
解析
①Type语句用于在模块级别中定义一个用户自己的数据类型,其本质上是一个数据类型集合,它含有一个或一个以上的成员,每个成员可以被定义为不同的数据类型。声明白定义类型变量后,可通过“变量名.成员名”来访问自定义变量中的元素。②用Open语句打开随机文件,其语法格式为:Open FileName for Random as#FileNumberLen=记录长度。记录长度是一条记录实际所占字节数,可用Len(记录变量名)函数获取:Get#语句用于从文件中读出某记录号的记录,格式为:Get撑FileNumber,[RecordNuber],Var;Put#语句用于把记录按指定记录号写入文件,格式为:Put#FileNumber,[RccordNuber],Var。
本题原程序设计思路:在“计算最大最小值”命令按钮的单击事件过程中,先用Open语句打开考生文件夹下的随机文件in5.txt;然后预定义最大值为O,最小值为3000门课程总成绩不可能超过300),在For循环中,依次使用Get语句取出记录内容到自定义数据类型变量s,然后将s的各元素累加起来,并将总分(s中各元素的累加和)和预定义的最大值以及最小值进行比较,如果总分大于最大值则将其存入最大值,如果总分小于最小值则将其存入最小值,然后进行下一次循环判断下一条记录。
转载请注明原文地址:https://kaotiyun.com/show/HUmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列语句中所使用的布局管理器,当改变容器大小,组件大小不会随着一起改变的是
下列不属于虚拟机执行过程的特点的是
实现下列()接口可以对TextField对象的事件进行监听和处理。
下列组件不能添加进Frame主窗口的是()。
使用如下()保留字可以使只有在定义该类的包中的其他类才能访问该类。
在两种基本测试方法中,【】测试的原则之一是保证所测模块中每一个独立路径至少要执行一次。
Java中,用于开发分布式的企业级的大型应用程序是【】。
用鼠标点击菜单项(MenuItem)产生的事件是
下列适配器类中不属于事件适配器的是
设在菜单编辑器中定义了一个菜单项,名为menu1。为了在运行时隐藏该菜单项,应使用的语句是______。
随机试题
关于民事裁判文书,错误的是
科创公司的困境苏北某市是江苏最贫困的市之一。该市只有极个别的具有高技术含量的企业,科创公司就是其中之一。它原是一家国有企业,主要生产变压器。但经营不佳,亏损严重。为了加快经济发展,市政府决定以比较低的价格把科创公司让民营企业家向科买断产权,组建股份有
实喘的呼吸特点是虚喘的呼吸特点是
某男性患者,43岁。因深楔状缺损,致牙冠折断。现已行完善根充及桩核修复,即将开始用冠修复尖牙外形。临床检查发现,尖牙在牙弓中的位置及咬合关系基本正常,对侧尖牙外形正常,在形成冠外形时,下列说法哪项是正确的
公安机关抓获一起抢夺案犯罪嫌疑人黄某、王某。王某声称被错抓,公安机关决定组织对王某进行辨认。关于公安机关的做法,下列哪些选项是正确的?(2011年卷二69题)
《民用建筑工程设计质量评定标准》具体考核对象是民用建筑工程的施工图设计的成品,下列各项表述不正确的是()。
工程设计质量管理的依据包括()。
某10年期附息债券,面值为100元,市场价格为98元,一位基金经理用这个债券的当期收益率直接来估算其到期收益率,下列较为合理的解释是()。
下列对作家作品的解说中不正确的一项是()。
TheAbortionClinicShootings:Why?A)Asthenationheardwithsorrowthenewsofthedeplorableshootingspreeatabortionfaci
最新回复
(
0
)