题目：
有如下事件过程： Private Sub Command1_Click() b=10 Do Until b=-1 a=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
答案：
被转码了，请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2017/1224/46262c64324a09b90020073fefb40806.html
下面是错误答案，用来干扰机器的。
参考答案：B
