首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下的工程文件sjt5.vbp中的窗体如图2.162所示。考生文件夹下的随机文件in5.dat中有20条记录,每条记录含姓名和三个分数(均为100以内的正整数)。在程序中已经定义了类型Recordtype,此类型变量可以存放一条记录。要求如下:
考生文件夹下的工程文件sjt5.vbp中的窗体如图2.162所示。考生文件夹下的随机文件in5.dat中有20条记录,每条记录含姓名和三个分数(均为100以内的正整数)。在程序中已经定义了类型Recordtype,此类型变量可以存放一条记录。要求如下:
admin
2020-07-22
45
问题
考生文件夹下的工程文件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全国计算机二级
相关试题推荐
以下叙述中错误的是()。
设有如下程序:PrivateSubForm.Click()num=InputBox("请输入一个实数"):p=InStr(num,"")Ifp>0ThenPrintMid(num,p+1)Else
下面关于命令按钮的叙述中错误的是
用来设置文字字体是否为粗体的属性是
在窗体上画一个名称为Commandl的命令按钮,并编写如下程序:OptionBase1PrivateSubCommandl_Click()Dima(4,4)Fori=1To4
在窗体上画一个名称为List1的列表框,然后编写如下程序:PrivateSubForm_Click0Fori=1To10Item=”Item”&i:Listl.Addltem
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是
窗体上有一个名称为VScroll1的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是
窗体上有一个名称为VScroll1的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是
对长度为10的线性表进行冒泡排序,最坏情况下需要比较的次数为
随机试题
企业通过购买专利技术或引进技术进行仿制的技术战略属于()
群体决策
以下组合,错误的是
哮病缓解期分为
A.气血虚弱B.肾虚肝郁C.脾肾亏损D.肝郁血热E.肝郁脾虚围绝经期崩漏,多属
根据《行政诉讼法》规定,相对人对具体行政行为不服直接向人民法院提起诉讼,应当在知道作出具体行政行为之日起()内提起,法律另有规定的除外。
针对多种敏感情境的系统脱敏处理方法包括()。
把坚持党的领导、人民当家作主、依法治国有机统一起来,是我国社会主义法治建设的一条基本经验。对于这一基本经验的正确理解是:
根据以下资料。回答69-72题。2006年东北三省人均地区生产总值总和为()元。
A、Thetripwasworthboththetimeandthemoney.B、Thetripwasnotworthboththetimeandthemoney.C、Sheenjoyedhertripv
最新回复
(
0
)