[填空題] 以下是一個比賽評分程序。在窗體上建立一個名稱為Text1的文本框數(shù)組，然后畫一個名為Text2的文本框和名為Command1命令按鈕。運行時在文本框數(shù)組中輸入6個分數(shù)，單擊"計算得分"命令按鈕，則最后得分顯示在Text2文本框中(去掉一個最高分和一個最低分后的平均分即為最后得分)，如下圖所示。請?zhí)羁铡?/p>

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= (7)

For k=0 To 5

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= (8) /4

End Sub

(Sum-Text1(0)-max-min)

本題考查了文本框控件的數(shù)組，控件數(shù)組是由一組相同類型的控件組成，這些控件共用一個相同的名字，具有同樣的屬性設置?？丶?shù)組建立后，只要改變一個控件的Name屬性，并把index屬性設置為空，就能把控件從數(shù)組中刪除?？丶?shù)組中的控件執(zhí)行相同的事件過程。題目正是使用了控件數(shù)組的這個性質，然后求數(shù)組的各元素之和的。Min開始要初始化，所以要給它賦值。k是條件變量，應該從0開始。最后求平均值，要用所求的和減去最大值和最小值。