有如下VB程序段：

s =“312321”：m=0：c=“”：k=1

For i=1 To Len(s)

    m=m+k

    If k=1 Then c=Mid(s，n，1)+c Else c=c+ Mid(s，m，1)

    If i Mod 3=0 Then k=-k：m=Len(s)+1

Next i

执行该程序段后。变量c的值是(    )

A、”213321”

B、”213123"

C、”312123"

D、”312213 "