在窗体中添加一个名称为C1的命令按钮,然后编写如下事件代码: Private Sub C1_Click() str="ABAABAAABABBA" For i=6 To 2 Step-2 x=Mid(str,i,i) y=Le

admin2010-03-22  29

问题 在窗体中添加一个名称为C1的命令按钮,然后编写如下事件代码:   
Private Sub C1_Click()   
str="ABAABAAABABBA"   
For i=6 To 2 Step-2   
x=Mid(str,i,i)   
y=Left(str,i)   
z=Right(str,i)   
Next  i   
MsgBox  x&y&z   
End Sub   
单击命令按钮,则消息框的输出结果是(    )。

选项 A、ABBAAB
B、ABBABA
C、BABABA
D、BAABBA

答案D

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

最新回复(0)