当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