执行下面的程序,消息框里显示的结果是_________。 Private Sub Form_Click() Dim StrAs SUing,S As SUing,kAs Integer Str=”abC”

admin2013-10-28  0

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

选项 A、abe   
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的值为abccba。
转载请注明原文地址:https://kaotiyun.com/show/7Crp777K
0

最新回复(0)