首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组,然后画一个名为Text2的文本框和名为Command1命令按钮。运行时在文本框数组中输入7个分数,单击“计算得分”命令按钮,则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分后
以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组,然后画一个名为Text2的文本框和名为Command1命令按钮。运行时在文本框数组中输入7个分数,单击“计算得分”命令按钮,则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分后
admin
2013-04-11
48
问题
以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组,然后画一个名为Text2的文本框和名为Command1命令按钮。运行时在文本框数组中输入7个分数,单击“计算得分”命令按钮,则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分后的平均分几位最后得分),如图16-9所示。请填空。
Private Sub Command1_Click()
Dim k As Integer
Dim sum Ad Single, max As Single, min As Single
sum=Text1(0)
max=Text1(0)
min=【 】
For k=【 】To 6
If max<Text1(k)Then
max=Text1(k)
End If
If min>Text1(k)Then
Min=Text1(k)
End If
sum=sum+Text1(k)
Next k
Text2=(【 】)/5
End Sub
选项
答案
Text(0) ,1 ,sum-max-min
解析
根据题意,本题的功能是计算得分程序,即去掉一个最高分和一个最低分后的平均分即为最后的得分。所以程序段开始时应将第一个文本框的值Text1(0)赋给sum、max和min,所以[10]处应填入的是Text1(0);对于For循环应该是从Text1(1)开始处理,其下标是1,所以[11]处应填入的是“1”;Text2用来输出得分,即去掉一个最高分和一个最低分后的平均分,所以在[12]处应填入的是“sum-max-min”。
转载请注明原文地址:https://kaotiyun.com/show/B4hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了定义自己的鼠标光标,首先应把MousePointer属性设置为【】,然后把【】属性设置为一个图标文件。
符号%是声明______类型变量的类型定义符。
假定有如下的窗体事件过程:PrivateSubForm_Click()a$="MicrosoftVisualBasic"b$=Right(a$,5)c$=Mid(a$,1,9)
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsIntegerx=5y=7
计时器文件设置时间间隔的属性是
已知数据表A中每个元素距其最终位置不远,为节省时间,应采用的算法是______。
以下叙述中错误的是______。
在设计应用程序时,通过______窗口可以查看到应用程序工程中的所有组成部分。
随机文件以【】为单位读写,随机文件的记录是【】记录。
控件数组的名字由Name属性指定,而数组中的每个元素由【】属性指定。
随机试题
教师良心是隐藏在教师内心深处的一种对教师社会道德责任感、义务感的认识和感情以及自我评价能力。()
基础结构n.i________
简述实用主义教育学的主要观点。
肺气郁闭之喘证,平素常有
何日“润下”
在我国,监理单位与建设单位之间的关系是()。
有限合伙企业中的合伙人身份可能会发生变化,对此,下列说法中,正确的有()。
足球比赛开球时,守方每一位队员需站在开球点_______米以外。
2,2,7,9,16,20,()
Thepairofwords"buy"and"sell"are
最新回复
(
0
)