在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：
　　Private Sub Command1_Click（）
　　Dim a$, b$，c$, k%
　　a="ABCD”
　　b=”123456”
　　c=""
　　k=1
　　Do While k＜= Len（a）Or k＜=Len（b）
　　If k＜=Len（a）Then
　　c=c＆Mid（a, k, 1）
　　End If
　　If k＜=Len（b）Then
　　c=c＆Mid（b, k, 1）
　　End If
　　k=k＋1
　　Loop
　　Print c
　　End Sub
　　运行程序，单击命令按钮，输出结果是（）

A．123456ABCD
B．ABCD123456
C．D6C5B4A321
D．AlB2C3D456