如下一段VB程序运行后，变量a的值为（    ）。

Dim i As Integer, a As Integer

i=6

a=6

If i <6 Then 

    a = a +4

Else

    a = a -4

End If

A、2

B、10

C、6

D、4