执行下面的程序,消息框里显示的结果是_______。 Private Sub Form_Click() Dim StrAs String,S As String,kAs Integer Str="abc" S=Str For k=Len(Str)To 1

admin2015-12-16  3

问题 执行下面的程序,消息框里显示的结果是_______。
Private Sub Form_Click()
Dim StrAs String,S As String,kAs Integer
Str="abc"
S=Str
For k=Len(Str)To 1 Step-1
S=S &(Mid(Str,k,1))
Next k
MsgBox S
End Sub

选项 A、abc
B、abccba
C、cbacba
D、abcabc

答案B

解析 本题考查的是字符串函数和循环语句For…Next的使用。循环语句For…Next能够重复执行程序代码区域特定次数,使用格式如下:
For循环变量=初值 To 终值[Step步长]
循环体
[条件语句序列
Exit.For
结束条件语句序列]
Next[循环变量]
在VBA中有三种取子串函数:Left函数用于在字符串左端开始取n个字符;Right函数用于在字符串右端开始取n个字符(注意子串中字符的顺序与母串中相同);Mid函数可以实现在任何位置取任何长度的子串。字符串长度检测函数Len(<字符串表达式>或<变量名>)的作用是返回字符串所含字符数。本题中相当于每次循环从后向前取得Str中的一个字符连接到S的后面,即最后S的值为abecba。
转载请注明原文地址:https://kaotiyun.com/show/YtBD777K
0

随机试题
最新回复(0)