选择题
在窗体上有一个命令按钮Command1,编写如下事件代码:
Private Sub Command1_Click()
s='ABBACDDCBA'
For i=6 To 2 Step -2
x=Mid(s, i, i)
y=Left(s, i)
z=Right(s, i)
z=x&y&z
Next i
MsgBox z
End Sub
运行窗体后,单击命令按钮,则消息框输出的结果是______。
A、
AABAAB
B、
ABBABA
C、
BABBAB
D、
BBABBA
【正确答案】
D
【答案解析】
在VBA中包含三种取子串函数,①Left()函数表示在字符串左端开始取n个字符;②Right()函数表示在字符串右端开始取n个字符,并且子串中字符的顺序与母串相同;③Mid()函数表示在任意位置取任意长度的子串。本题中每次循环都会为z赋一个新值Right(s,i),所以在最后一次循环中z才有意义,最后当i=2时,选项D正确。
提交答案
关闭