首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下的工程文件sit4.vbp中有1个标题为“编号”的标签Label1,1个用于接收选手编号的初始文本为空的文本框Text1;1个含有10个元素的文本框控件数组Text2用于接收10个评委对某选手的打分;另有1个含有10个元素的标签控件数组Labe
考生文件夹下的工程文件sit4.vbp中有1个标题为“编号”的标签Label1,1个用于接收选手编号的初始文本为空的文本框Text1;1个含有10个元素的文本框控件数组Text2用于接收10个评委对某选手的打分;另有1个含有10个元素的标签控件数组Labe
admin
2019-06-20
83
问题
考生文件夹下的工程文件sit4.vbp中有1个标题为“编号”的标签Label1,1个用于接收选手编号的初始文本为空的文本框Text1;1个含有10个元素的文本框控件数组Text2用于接收10个评委对某选手的打分;另有1个含有10个元素的标签控件数组Label2用于显示评委名称:“评委1”、“评委2”…,还有1个标题为“统计得分”的命令按钮。请再添加1个图片框Pieture1,2个根据显示的内容自动调整大小、标题分别为“选手编号”和“得分”的标签LabeB和Label4,如图所示。
程序功能如下:
在Text1文本框中输入选手编号,并在Text2文本框控件数组中输入10个评委对该选手的打分情况后,单击“统计得分”按钮,则对10个评委的打分去掉一个最高分和一个最低分之后求平均分,该平均分即为选手的最后得分。最后将选手编号和得分显示在图片框Picture1中,并将Text1、Text2的内容置为空。
命令按钮的Click事件过程已经给出,但是事件过程并不完整,请将其中的注释符去掉,把“?”改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后程序按原文件名进行存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件,添加两个标签和一个图片框,属性见表2。 [*] 步骤2:分析并编写程序代码。 程序提供代码如下: Private Sub Command1_Click() If Len(Text1)=0 Then MsgBox"选手编号不能为空,请检查!","检查" Exit Sub End If For n=0 To 9 If Len(Text2(n))=0 Then MsgBox"评委给分不能为空,请检查!","检查" Exit Sub End If Next n Max=Val(Text2(0)):Min=Val(Text2(0)) Sum=val(Text2(0)) ’For n=?To 9 Select Case Val(Text2(n)) ’Case Is?Max Max=Text2(n) ’Case Is?Min Min=Text2(n) End Select ’Sum=?+Val(Text2(n)) Next n score=(Sum-Max-Min)/8 Picture1.Print Text1;Space(5);score Text1="" For n=0 To 9 Text2(n)="" Next n End Sub 参考答案: 第1个?处填入:1 第2个?处填入:> 第3个?处填入:< 第4个?处填入:Sum 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
在Command1 Click事件过程中,通过Len函数判断选手的编号是否为空,如果Len(Text1)=0,那么弹出对话框“选手编号不能为空,请检查!”,退出程序。同理,检验评委给分,如果为空弹出对话框“评委给分不能为空,请检查!”。退出程序。通过For语句和Select Case语句统计最大值、最小值以及所有评委评分总和,然后按照题目要求对10个评委的打分去掉一个最高分和一个最低分之后求平均值,该平均分即为选手的最后得分,运用图片框的Print方法,输出选手编号和得分,并运用Space(5)输出空格函数进行调整,向时将Text1、Text2的内容置为空。
转载请注明原文地址:https://kaotiyun.com/show/MSUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。在横线处应填写()。PrivateSubCommand1_Click()DiminDataAsStringText1.T
下面程序在调试时出现了死循环PrivateSubCommand1_Click()n=InputBox(“请输入一个整数”)DoIfnMod2=0Thenn=n+1Elsen
设有如下变量声明语句:Dima,bAsBolean则下面叙述中正确的是
下列哪一条不属于数据库设计的任务?()
下列数据结构中,属于非线性结构的是
在软件生命周期中,能准确确定软件系统必须做什么和必须具备哪些功能的阶段是
为了验证一个正整数n(n>3)是否为素数,最直观的方法是,看在2~n/2范围内能否找到一个整数m将n整除,若m存在,则n不是素数;若找不到m,则n为素数。在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有1个名称为Text1的文本框。请根据上面的算法
每所学校都有一名校长,而每个校长只在一所学校任职,则实体学校和实体校长之间的联系是()。
在线性表的链式存储结构中,其存储空间一般是不连续的,并且()。
算法的时间复杂度是指()。
随机试题
质检机构取得计量认证合格后,经()年要进行复查。
每个评价项目都有其自身的专业特点,因此,评价单位不可能事事依靠内部专家,还必须从社会上聘请一定数目的()来参加调查评价工作。
安全检查的内容不仅查管理、查隐患,还应查()。
发包人和承包人就有关工期、质量、造价等产生的建设工程合同争议,是建设工程领域最常见的()。
下列属于资产负债管理原则的有()。
流动性风险管理水平体现了商业银行的整体经营管理水平。()
旅游主管部门在作出行政处罚决定前,应当以()形式告知当事人作出行政处罚决定的事实、理由、依据和当事人依法享有的陈述、申辩权利。
不考虑价格因素,2011年与2003年相比,江苏金融业增加值增长的倍数是()。
《中华人民共和国物权法》第179条规定:“为担保债务的履行,债务人或者第三人不转移财产的占有,将该财产抵押给债权人的,债务人不履行到期债务或者发生当事人约定的实现抵押权的情形,债权人有权就该财产优先受偿。前款规定的债务人或者第三人为抵押人,债权人
TheplantspeciesthatDr.KinghorndiscoveredinPuertoRicoprovedtobe______tohismedicalresearch.
最新回复
(
0
)