各位大哥!!
小弟是一位VB的初者有個問題想請教
問題一
歌唱大賽有5位歌者進入總決賽,有10位評審參與評分工作,但每
位歌者所獲得的10位評審分數中,要先去掉最高分與最低分再平
均才是歌者的得分,要寫一程式記錄10位評審給5位歌者的分,最
後再計算每位歌者的得分。
但是小弟只會寫到計算每位歌者的總分和平均分數而已(程式如下)
還需要加什麼才能讓程式(去掉最高分與最低分再平均)
dim score(4,9)
for i = 0 to 4
sum = 0
for j = 0 to 9
s ="輸入第" & i + 1 & "位歌者,第" & j +1 & j + 1 & "位評審的分數"
score(i,j) = val (inputbox(s))
sum= sum + score( i ,j)
next j
print "第; i + 1;"位歌者總分="; sum, "平均分數 = "; sum/10
next i