题目内容:
以下程序的功能是:从键盘上输入若干个学生的考试分数,当输入负数时结束输入,然后输出其中的最高分数和最低分数。请在空白处填入适当的内容,将程序补充完整。
Private Sub Form_Click()
Dim x As Single, amax As Single, amin As Single
x=InputBox("Enter a score")
amax=x
amin=x
Do, While______
If x>amax Then
aman=X
End If
If______Then
amin=x
End If
x=InputBox("Enter a Score")
Loop
Pnnt"Max="; amax, "Min=";amin
End Sub
参考答案: