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

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

admin2009-06-20  42
问题 以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组，然后画一个名为 Text2的文本框和名为Command1的命令按钮。运行时在文本框数组中输入7个分数，单击“计算得分”命令按钮，则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分后的平均分即为景后得分)，如图所示。请填空。

Private Sub Command1_Click()
Dim k As Integer
Dim sum As 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＞TextloC)Then
min=Text1(k)
End If
sum=sum+Textl(k)
Next k
Text2=【  】/5
End Sub
选项
答案Text1(0) , 1 , sam-max-min
解析 要循环比较各个数，找出最大值和最小值，首先就要把第1个数的值赋值给最大值和最小值变量，而把值赋值给最小值变量为min=Text1(0)；由于已经把第1个数的值加到变量sum中了，所以从第2个数开始循环，而第2个数的控件数组索引为儿而求平均值时把最大值和最小值去掉了，即sum-max-rain。
转载请注明原文地址:https://kaotiyun.com/show/1N1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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