改变句子的说法，但不改变句子的意思。

（1）两只大船把一只一只大铁牛都拖了回来。

（2）水手们把船上的泥沙铲到黄河里去。

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