首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下的工程文件sjt5.vbp中的窗体如图2.162所示。考生文件夹下的随机文件in5.dat中有20条记录,每条记录含姓名和三个分数(均为100以内的正整数)。在程序中已经定义了类型Recordtype,此类型变量可以存放一条记录。要求如下:
考生文件夹下的工程文件sjt5.vbp中的窗体如图2.162所示。考生文件夹下的随机文件in5.dat中有20条记录,每条记录含姓名和三个分数(均为100以内的正整数)。在程序中已经定义了类型Recordtype,此类型变量可以存放一条记录。要求如下:
admin
2020-07-22
72
问题
考生文件夹下的工程文件sjt5.vbp中的窗体如图2.162所示。考生文件夹下的随机文件in5.dat中有20条记录,每条记录含姓名和三个分数(均为100以内的正整数)。在程序中已经定义了类型Recordtype,此类型变量可以存放一条记录。要求如下:
①请为“计算最大最小值”按钮编写Click事件过程,其功能是:读取文件中的记录,计算每人的总分,找出其中最大总分和最小总分,分别放入变量maxval,minval中(这两个变量已经给出,不得修改)。
②运行程序,单击“计算最大最小值”按钮后再单击“存盘”按钮。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须依次单击“计算最大最小值”、“存盘”按钮,否则无成绩。最后,程序按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件中的本题工程文件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
解析
转载请注明原文地址:https://kaotiyun.com/show/1cHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设栈的存储空间为S(1:m),初始状态为top=m+1。经过一系列入栈与退栈操作后,top=m。现又在栈中退出一个元素后,栈顶指针top值为()。
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是
下列说法中,错误的是
在窗体上画一个名称为Timer1的计时器控件,要求每隔0.5秒发生一次计时器事件,则以下正确的属性设置语句是
有数据定义语句:DimX,YAsInteger以上语句表明
窗体上有一个名称为VScroll1的垂直滚动条,要求程序运行时,滚动块的初始位置在最下端,应该使VScroll1.Value的值等于
在程序中要使用Array函数给数组arr赋初值,则以下数组变量定义语句中错误的是()。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为Combol的组合框,其宽度为1200,其类型如图3—188所示(即简单组合框)。要求如下:①请按图中所示,通过属
线性表的长度为n。在最坏情况下,比较次数为n一1的算法是()。
下列链表中,其逻辑结构属于非线性结构的是
随机试题
阿司匹林中能引起过敏反应的杂质是
患者男,65岁,糖尿病8年,注射普通胰岛素后1小时方进餐,此肘该老人出现头昏、心悸、多汗、饥饿感,护士应首先考虑发生了()
某地区大型工程项目由政府投资建设,业主委托某招标代理公司代理实施招标。招标代理公司确定该项目采用公开招标方式招标,招标公告在当地政府规定的招标信息网上发布。招标文件中规定:投标担保可采用投标保证金或投标保函方式担保。评标方法采用经评审的最低投标价法。投标有
按照《证券投资基金法》的规定,依法募集基金是基金管理公司的一项法定权利,其他任何机构不得从事基金的募集活动。
下列表述符合车船税征税现行规定的有()。
ABC会计师事务所在2009年度承接了各种业务。在参照《鉴证业务基本准则》的相关内容执行业务时,遇到了下列情况,请代为作出正确的专业判断。除了上市公司财务报表审计业务必须进行项目质量控制复核外,质量控制准则要求会计师事务所确定是否对其他业务实施项目质量
下列关于违约责任的选项中,表述正确的选项是()。
常常用电吹风来吹头发,却没有想过用它烘干潮湿的衣服。这种情况属于()
下列公文中,不属于党政机关法定公文文种的是()。
()是英国自“二战”结束以来规模最大的教育改革法案。
最新回复
(
0
)