万能百科  > 所属分类  > 

以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组,然后画一个名为Text2的

以下是一个比赛评分程序。在窗体上建立一个名为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 > Text1(k) Then

min = Text1(k)

End If

sum = sum + Text1(k)

Next k

Text2 = (______) / 5

正确答案:

text1(0) 1 (sum-max-min)

词条内容仅供参考,如果您需要解决具体问题
(尤其在法律、医学等领域),建议您咨询相关领域专业人士。

标签