38.學校要進行元旦文藝匯演了,學生會讓薛明來擔任總記分員,任務就是根據(jù)各個評委所打分數(shù),去掉一個最高分和一個最低分,然后計算平均分.薛明很快編寫了這個程序,該程序的界面如圖所示:
程序運行時,每輸入一個分數(shù)單擊“確定”按鈕(Command1),就將該分數(shù)記入總分,同時在下面顯示到目前為止已輸入的所有分數(shù).當所有的分數(shù)輸入完畢后,單擊“統(tǒng)計->”按鈕(Command2),程序就會在右邊顯示總分和最后的平均分.請回答下面的問題:
1)寫出上述圖形中所標識的③對象所屬的類?如④所屬的類為“文本框”.
③2)以下是薛明編寫的統(tǒng)計程序,請完善程序.
Dim total As Integer,ans As Single,x As Integer,max As Integer
Dim min As Integer,s As Integer
Private Sub Command1_Click
x=Val(Text1.Text)
total=total+x
s=s+1
If
④Then max=x
If x<min Then min=x
List1.AddItem x
End Sub
Private Sub Command2_Click
Label4.Caption=Str(total)
ans=
⑤ans=ans/(s-2)
Label6.Caption=
⑥End Sub
Private Sub Form_Load
total=0
s=0
min=10000
max=0
End Sub.