[填空题] 以下程序的功能是从键盘输入若干个学生的考试成绩，统计并输出最高分和最低分，当输入负数时结束输入。请填空。 Private Sub Command1_Click() Dim x,amax

[填空题] 以下程序的功能是从键盘输入若干个学生的考试成绩，统计并输出最高分和最低分，当输入负数时结束输入。请填空。

Private Sub Command1_Click()

Dim x,amax,amin As Single

x=InputBox("Enter a score")

amax=x

amin=x

Do While______

If x＞amax Then

amax=x

End If

If______Then

amin=x

End If

x=InputBox("enter a score")

Loop

Print "max=";amax,"min=";amin

End Sub