有如下VB程序段：

'生成6个随机正整数，依次存入数组元素a (1)到a (6)中

For i=1 To 2

  For j=6 To i+1 Step-1

    If a(j) Mod 2>a(j-1) Mod 2 Then

      t=a(j)：a(j)=a(j-1)：a(j-1)=t

    End If

  Next j

Next i

执行上述程序段后，a (1)到a (6)各元素值依次为3，1，4，3，7，6，下列选项不是排序前a(1)到a(6)各元素值依次元素值的(    )

A、3，1，4，3，6，7

B、4，3，1，3，6，7

C、3，4，1，3，6，7

D、4，3，1，3，7，6