[填空題] 以下是一個(gè)比賽評(píng)分程序。在窗體上建立一個(gè)名為T(mén)ext1的文本框數(shù)組，然后畫(huà)一個(gè)名為 Text2的文本框和名為Commandl的命令按鈕。運(yùn)行時(shí)在文本框數(shù)組中輸入7個(gè)分?jǐn)?shù)，單擊．“計(jì)算得分”命令按鈕，則最后得分顯示在Text2文本框中(去掉一個(gè)最高分和一個(gè)最低．分后的平均分即為最后得分)，如圖所示。請(qǐng)?zhí)羁铡rivate Sub Commandl_Click() Dim k As Integer Dim sum As Single,max As Single，min As Single sum=Text1(0) max=Text1(0) min= 【11】 For k= 【12】 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=( 【13】 )/5End Sub

【11】Text1(0)

【12】1【13】sum-max-min[評(píng)析] 要循環(huán)比較各個(gè)數(shù)，找出最大值和最小值，首先就要把第1個(gè)數(shù)的值賦值給最大值和最小值變量，而把值賦值給最小值變量為min=Text1(0)：由于已經(jīng)把第1個(gè)數(shù)的值加到變量sum中了，所以從第2個(gè)數(shù)開(kāi)始循環(huán)，而第2個(gè)數(shù)的控件數(shù)組索引為1；而求平均值時(shí)把最大值和最小值去掉了，即sum-max-min。