vbDoLoop条件循环:通过InputBox录入某些同学的数学成绩。在下面，求高手解答通过InputBox录入某些同学的数学成绩。如果录入的成绩小于0或者大于100，则放弃这个成绩重新录入。如果录入的成

Question

vb Do Loop条件循环:通过InputBox录入某些同学的数学成绩。在下面，求高手解答
通过InputBox录入某些同学的数学成绩。如果录入的成绩小于0或者大于100，则放弃这个成绩重新录入。如果录入的成绩为-1即认为分数录入完毕，且-1不算做分数。录入完成之后统计出参加考试
的人数、及格率、平均分、最高分、最低分。

Answer 1

Private Sub Command1_Click()Max = 0Min = 100Do While aaa -1aaa = Val(InputBox("请输入分数", "分数输入"))If aaa = 0 Thenscore = score + aaaIf aaa >= 60 Then q1 = q1 + 1If aaa > Max Then Max = aaaIf aa...