首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp,其窗体如图1-83所示。考生目录下有一个in5.dat 文件,文件中有5个运动员的姓名、7个裁判的打分和动作的难度系数。每人的数据占一行,顺序是:姓名、7个分数、难度系数。程序运行时,单击“输入”按钮,可把in5
在考生目录下有一个工程文件sjt5.vbp,其窗体如图1-83所示。考生目录下有一个in5.dat 文件,文件中有5个运动员的姓名、7个裁判的打分和动作的难度系数。每人的数据占一行,顺序是:姓名、7个分数、难度系数。程序运行时,单击“输入”按钮,可把in5
admin
2018-10-29
47
问题
在考生目录下有一个工程文件sjt5.vbp,其窗体如图1-83所示。考生目录下有一个in5.dat 文件,文件中有5个运动员的姓名、7个裁判的打分和动作的难度系数。每人的数据占一行,顺序是:姓名、7个分数、难度系数。程序运行时,单击“输入”按钮,可把in5.dat文件中的5个姓名读入数组athlete 中,把5组得分(每组7个)和难度系数读入二维数组a 中(每行的最后一个元素是难度系数),并把这些数据显示在Text1 文本框中;单击“选出冠军”按钮,则把冠军的姓名和成绩分别显示在文本框Text2、Text3中。成绩的计算方法是:去掉一个最高分和一个最低分,求剩下得分的平均分,乘以3再乘以难度系数;单击“存盘”按钮,则把冠军姓名和成绩存入考生目录下的out5.dat文件中。
要求:去掉程序中的注释符,把程序中的?改为正确的内容(程序中getmark 函数的功能是计算并返回第n个运动员的最后得分),并编写“选出冠军”按钮的Click事件过程。
注意:不得修改已经存在的程序和控件的属性,在结束程序运行前,必须用“存盘”按钮存储计算结果,否则无成绩。最后,程序按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: s = a(n, 1) For k = 2 To 7 getmark = s * 3 * a(n, 8) Private Sub Command2_Click() ’ 要求考生编写的程序 Dim k As Integer maxmark = getmark(1) m = 1 For k = 2 To 5 If maxmark < getmark(k) Then maxmark = getmark(k) m = k End If Next k Text2 = athlete(m) Text3 = maxmark End Sub 步骤2:按要求将文件保存至考生文件夹中。 步骤3:按<F5>键键运行程序,先单击“读入”按钮,然后单击“选出冠军”按钮,最后单击“存盘”按钮。
解析
转载请注明原文地址:https://kaotiyun.com/show/jtFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个组合框,其名称为Combo1,然后编写如下事件过程:PrivateSubForm_Load()Combo1.Text="1"Fori=1To10Sum=Sum+iNe
数据库设计中反映用户对数据要求的模式是( )。
要计算x的平方根并放入变量y,正确的语句是( )。
窗体上有1个名称为Text1的文本框,1个名称为Timer1的计时器,且已在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是,单击窗体,则每隔2秒钟在Text1中显示一次当前时间。Priva
下列不属于计时器控件属性的是
为了使标签控件在显示其内容时不覆盖其背景内容,需进行设置的属性为( )。
在VisualBasic中,所有标准控件都具有的属性是( )。
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
某二叉树共有12个结点,其中叶子结点只有1个。则该二叉树的深度为(根结点在第1层)
在E-R图中,用来表示实体联系的图形是
随机试题
社会发展过程的决定性()
目前我国常用的临床常规测定血浆葡萄糖的方法是
下列关于肿瘤化疗的叙述,错误的是
患者柳某,女,32岁,胁肋隐痛日久,口干咽燥,心中烦热,头晕目眩,舌红少苔,脉弦细数。此属胁痛何类型
A.麦角菌科B.多孔菌科C.马尾藻科D.松萝科E.棕榈科灵芝来源于()
根据《海关法》规定,进口货物的完税价格,由海关以进出口货物的()为基础审定完税价格。
我国现行采用的签证制度一次签证多次有效。()
安定:动荡
朋友的亲人病了,朋友叫你带他家人去看病,可是你手头有工作,你怎么办?
Entertheinformationage.Informationistherawmaterialformanyofthebusinessactivities【C1】______thisnewera,justasir
最新回复
(
0
)