2. 计算机
  3. 以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组，然后画一个名为Text2的文本框和名为Command1命令按钮。运行时在文本框数组中输入7个分数，单击“计算得分”命令按钮，则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分后

以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组，然后画一个名为Text2的文本框和名为Command1命令按钮。运行时在文本框数组中输入7个分数，单击“计算得分”命令按钮，则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分后

admin2013-04-11  50
问题 以下是一个比赛评分程序。在窗体上建立一个名为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全国计算机二级

相关试题推荐
随机试题
最新回复(0)