急性脊髓炎应与下列疾病进行鉴别，但除外（）

A．急性硬脊膜外脓肿

B．脊柱结核及转移性肿瘤

C．脊髓出血

D．脊髓灰质炎

以下程序的功能是：从键盘上输入若干个数字，当输入负数时结束输入，统计出若干数字的平均值，输出结果。请填空。
Private Sub Form_click()
Dim x，y As Single
Dim z As Integer
x=Input Box("Enter a score")
Do while 【8】
y=y+x
z=z+1
x=InputBox("Enter a score")
Loop
If z=0 Then
z=1
End If
y= 【9】
Print y
End Sub