以下程序的功能是:从键盘上输入若干个学生的考试分数,统计并输出最高分数和最低分数,当输入负数时结束输入,输出结果。请填空。 Private Sub Form_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