单项选择题
在窗体上画一个命令按钮,其名称为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