问题
单项选择题
有如下事件过程：
Private Sub Commandl_Click()
b=10
Do Until b=-1
a=InputBox(“请输入a的值”)
a=Val(a)
b=InputBox(“请输入b的值”)
b=Val(b)
a=a*b
Loop
Pdnt a
End Sub
程序运行后，依次输入数值30，20，10，-1，输出结果为( )。
A．6000
B．-10
C．200
D．-6000
答案
参考答案：B