按照需要的形式，需要可以分为（）、（）和（）。

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

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

B．