有如下VB程序段：

For i= 1 To 8

    a(i) =Int(Rnd*2)

Next i

sum= 0

For i=1 To 8 Step 3

    For j=i To 8

        a(j)=1-a(j)

    Next j

    sum=sum+a(i)

Next i

Text 1.Text=Str(sum)

执行该程序段后，文本框Text 1中显示的内容不可能是（  ）

A、0

B、2

C、3

D、4