以下程序的功能是，从键盘上输入若干学生的成绩，统计并输出最高分数和最低分数，当输入负数时结束输入，请填空。
Private Sub Command1_C1iek()
Dim x As Single
Dim amax As Single,amln As Single
x=InputBox("请输入分数")
amax=x
amin＝x
Do While 【8】
If x＞amax Then
amax=x
End If
If 【9】 Then
amin=x
End If
x＝InputBox("请输入分数")
Loop
Print amax,amin
End Sub

面试成功后，高校毕业生应及时与用人单位签订（）。