1樓：一○○度
1.新增一個窗體 form1，在窗體中放一個按鈕 ***mand1
2.新增一個類模
塊：class1
3.----------將下面**複製到窗體**中：
private sub form_load()
***mand1.caption = "計算得分"
end sub
private sub ***mand1_click()
dim nfen as new class1, s as single
s = nfen.defen(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
msgbox "去掉一個最高分，去掉一個最低分，平均得分：" & s, vbinformation
end sub
4.-----------將以下**複製到類模組：
public property get defen(paramarray fen()) as single
dim s1 as long, s2 as long, i as long, min as single, max as single
s1 = lbound(fen): s2 = ubound(fen)
'查詢最低和最高分
min = fen(s1): max = fen(s1)
for i = s1 to s2
if fen(i) < min then min = fen(i)
if fen(i) > max then max = fen(i)
next
'計算總分
for i = s1 to s2
s = s + fen(i)
next
defen = (s - min - max) / (s2 - s1 + 1)
end property
語文練習題求答案,一道語文練習題,急求答案
1.一進門,我 就看見爺爺正在專心致志地練書法。改病句 2.以 日出 為內容,寫一個比喻句和一個擬人句。比喻句 早晨太陽像一個火球從東方升起。擬人句 早晨太陽跳出了海面。3.老師說,廣泛閱讀課外書,既能 能增長知識 又能 提高寫作水平 補充句子 4.王剛語文好。大家語文有問題就去問王剛。用關聯詞浴霸...
仿寫 造句練習題，仿寫句子練習題（附答案）
比喻句 擬人句 排比句 感嘆句 反問句 設問句 不管不管總是 哪怕也雖然但是如果就 如 生命是水，尊嚴就是流動 生命是火，尊嚴就是燃燒 生命是飛鷹，尊嚴就是翱翔 你想要仿寫啥型別句子 仿寫句子練習題答案 1.原句 未經歷風雨交加的夜晚，哪會體會到風和日麗的可愛！仿寫 未經歷艱難困苦的阻擋，哪會體會到...
朝花夕拾練習題附答案！！急，朝花夕拾練習題附答案！！急！！！
1 貓狗鼠 中寫了與人關係密切的 三種動物，魯迅對狗，貓的態度是怎麼樣的 回？你能從這些小答事中看出魯迅的性格和鬥爭意識嗎？2魯迅偏愛小鼠，除了表現他的孩子氣外，還有什麼性格？3在 二十四孝圖 中，為什麼作者對反對白話者的憎恨如此強烈？4 無常 中 無常 這個陰鬼是什麼樣的的形象，寫這個是出於什麼目...