问题
单项选择题
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click()
Dim a$，b$，c$，k%
a="Visual"
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) 123456Visual
B) Visua1123456
C) 16a5u4s3i2Vl
D) Vl12s3u4a516
答案
参考答案：D
解析： 本题中Do …Loop While的循环条件是当k小于字符串a或者b的长度时，循环继续。循环体中第一个If语句的作用是取出字符串a中第k个位置上的字符，第二个If语句的作用是取出字符串b中第k个位置上的字符，每次循环结束输出刚刚从字符串a和b中取出的字符，所以第一次循环输出的是V1，第二次循环输出的是i2，第三次循环输出的是s3，第四次循环输出的是u4，第五次循环输出的是a5，第六次循环输出的是16，答案为D) 。