有如下事件过程： Private Sub Command1_Click() b=10 Do Until b =-1a = InputBox("请输入a的值")a = Val(a) b = InputBox("请输入b值") b = Val(b)a=a*b Loop Print a End Sub 程序运行后，依次输入数值30，20，10，-1后，输出结果为( )。

A．6000

B．-10

C．200

D．-6000

新生儿期应接种的疫苗是（）

A.麻疹减毒活疫苗

B.破伤风抗毒素

C.乙脑疫苗

D.百白破三联疫苗

E.卡介苗