在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() s="ABBACDDCBA" For 1=6 To 2.Step -2 x=Mid(s,I,I) y=Left(s,I)

admin2019-05-23  61

问题 在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码:
Private Sub Command1_Click()
s="ABBACDDCBA"
For 1=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、BABBA
D、BBABBA

答案D

解析 本题考查VBA中循环和取子串函数的知识。在’VBA中有三种取子串函数:Left函数用于在字符串左端开始取n个字符;Right函数用于在字符串右端开始取n个字符(注意子串中字符的顺序与母串中相同);Mid函数可以实现在任何位置取任何长度的子串。在本题中由于循环每次都会为z赋一个新的值Right(s,i),所以只有最后一次循环中的z值才有意义。最后一次循环时i=2,所以D选项正确。
转载请注明原文地址:https://kaotiyun.com/show/YD0p777K
0

相关试题推荐
最新回复(0)