单项选择题

有如下事件过程:
Private Sub Command1_Click()
b=10
Do Until b=-1
a=InputBox("请输入a的值")
a=Val(

A.
b=InputBox("请输入b的值")
b=Val(
B.