首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下的工程文件sjt5.vbp中的窗体如图1-215所示。考生文件夹下的随机文件in5.dat中有20条记录,每条记录含姓名和三个分数(均为100以内的正整数)。在程序中已经定义了类型Recordtype,此类型变量可以存放一条记录。要求如下: ①
考生文件夹下的工程文件sjt5.vbp中的窗体如图1-215所示。考生文件夹下的随机文件in5.dat中有20条记录,每条记录含姓名和三个分数(均为100以内的正整数)。在程序中已经定义了类型Recordtype,此类型变量可以存放一条记录。要求如下: ①
admin
2010-09-02
53
问题
考生文件夹下的工程文件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全国计算机二级
相关试题推荐
数据库、数据库系统和数据库管理系统之间的关系是( )。
利用File对象可以判断的是
Java中的继承机制之所以能够降低程序的复杂性,提高编程的效率,主要是因为它使代码可______。
数据的逻辑结构在计算机存储空间中的存放形式称为数据的______。
下列关于JavaApplication与JavaApplet程序的差别,描述正确的是______。
下面程序中,若从键盘输入大写字母C,则程序的输出结果是______。importjava.io.*;publicclassTest{publicstaticvoidmain(String
下列组件不能添加进Frame主窗口的是()。
Applet类中用于返回包含Applet的HTML,文件URL的方法是______。
可以在for循环初始化部分声明一个变量,其作用域是( )。
菜单编辑器可分为3个部分,即数据区、【】和菜单项显示区。
随机试题
23岁男性患者,2周前突起全身水肿、尿量减少、血尿,近5天来尿量逐渐减少,伴脸色苍白,查:血压180/100mmHg,尿蛋白(+++),红细胞(+++),白细胞0~3/HP,颗粒管型0~2/HP,血肌酐440μmol/L,血红蛋白90g/L。该患者的治
55岁,左下后牙咬物酸软1年余,曾于外院补牙,效果不明显,咬物仍酸软,喝汤时疼痛。查:左下第一磨牙远中咬合面大面积充填体,叩诊(+),X线片示已进行根管治疗,髓顶未揭全,根尖有暗影左下第二前磨牙龋坏达牙本质中层。还应进行的检查是
患隐性糖尿病的高血压患者,不宜选用下列哪个药物
去甲肾上腺素清除的方式包括
药物对胎儿的致畸作用
最大纵坡的确定应考虑的因素有()。
各单位应定期将会计账簿记录与相应的会计凭证记录逐笔核对,检查以下内容是否一致()。
【给定资料】1.“自恃八斗经纶才,囿三尺壅蔽讲台。空有一具自由身,落樊笼经年复数载……”“人生并非漫长无边,无非求一顺心意、开心颜,我于年近不惑请辞,仅与个人心性志趣有关,同时也源于不想久事笔砚文牍之间而无所用事。”继“世界那么大,我想
新闻侵权:是指新闻单位或者个人利用大众传播媒介以故意捏造事实或者过失报道等形式向受众传播内容违法或失实的新闻,从而侵害公民和法人的合法权益的行为。新闻侵权可分为刑事犯罪行为和民事违法行为。前者主要是诽谤罪,指“捏造事实诽谤他人,情节严重”的行为。后者主
TheodoreDreiserandJackLondonareamongthebestrepresentativewritersofliterary
最新回复
(
0
)