单项选择题

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

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