首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下的工程文件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
63
问题
考生文件夹下的工程文件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全国计算机二级
相关试题推荐
设计窗体时双击窗体的任何位置,将打开()。
以下()操作不能触发滚动条Change事件。
从键盘上输入一个浮点数asingle,利用字符串函数对该数进行处理后,如果输出的内容不是“非浮点数”,则对程序输出的内容分析正确的是()。asingle=InputBox("请输入一个浮点数:")str1$=Str$(asingle):p=In
窗体上有一个图片控件和一个按钮控件,下列程序执行的结果是()。PrivateSubCommand1_Click()Picture1.Picture=LoadPicture("c:\picture.jpg")Picture1.ClsPi
在窗体上有一个名称为Check1的复选框数组(含4个复选框),还有一个名称为Text1的文本框,初始内容为空。程序运行时,单击任何复选框,则把所有选中的复选框后面的文字罗列在文本框中(如图所示)。下面能实现此功能的事件过程是()。
(1)考生文件夹下的工程文件sjt3.vbp中有一个初始内容为空、且带有垂直滚动条的文本框,其名称为Text1:两个标题分别为“读数据”和“查找”的命令按钮,其名称分别为Cmd1、Cmd2。请画一个标题为“查找结果”的标签Label1,再画一个名称为Tex
为了声明一个长度为128个字符的定长字符串变量StrD,以下语句中正确的是
下列循环能正常结束的是()。
结构化程序设计的基本原则不包括()。
循环队列的存储空间为Q(1:100),初始状态为front=rear=100。经过一系列正常的入队与退队操作后,front=rear=99,则循环队列中的元素个数为()。
随机试题
A.无痛性肉眼全程血尿B.终末血尿C.初始血尿D.疼痛伴血尿E.血尿+蛋白尿泌尿系肿瘤的血尿是
下列关于工程项目综合管理的论述中正确的是()。
A公司为参与配售的B保荐机构相关子公司,双方签订了配售协议,下列关于A公司认购股票的具体比例的说法正确的是()。Ⅰ.A公司应该在协议中承诺按照股票发行价格认购发行人首次公开发行股票数量2%至5%的股票Ⅱ.B公司发行规模不足10亿元的
下列哪一项不是2018年新组建的国务院组成部门?
阅读下列材料,回答问题。某市乙公司获准使用该市一块土地,用途是设置综合农场,发展农业。2014年3月26日,该市规划局调查获知乙公司在地块内陆续建房、搭脚手架,但并没有用来发展农业,而是以“乙农庄”的名义对外经营。规划局遂于2014年4月2日向乙农庄作出
以长期饱受外界质疑的器官分配为例,为最大程度减少人工干预,如今这项工作已经交由相关科研部门设计的人体器官分配与共享计算机系统来完成。该系统以患者的医疗状况紧急程度和器官匹配程度等医学需求作为器官分配的唯一准则,实施自动分配和共享,并向国家和地方监管机构提供
要素主义教育评述。
Aftergraduatingformhighschool,peoplerarelymultiplyfractionsordiscussancientRome,buttheyareconfronteddailywith
FiveCommonMistakesinConversationandTheirSolutionsI.NotlisteningA.Problem:mostpeopledon’tlisten—waiteagerlyf
SurfingtheInternetduringclassdoesn’tjuststealfocusfromtheeducator:italsohurtsstudentswho’realreadystruggling
最新回复
(
0
)