单项选择题

当VB执行下面语句后,A的值为()
Private Sub Command1_Click()
Dim a As Integer
a=10
If a>0Then a=a+1
If a>1Then a=0
Print a
End Sub

A.0
B.1
C.2
D.3