单项选择题

有如下事件过程：
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，输出结果为( )。

点击查看答案