选择题 39.  执行下面的程序,消息框里显示的结果是______。
    Private Sub Form_Cick()
    Dim Str As String, S As String, k As 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
【正确答案】 B
【答案解析】[考点] 本题考查的是字符串函数和循环语句For... Next的使用。
循环语句For... Next能够重复执行程序代码区域特定次数,使用格式如下:
   For循环变量=初值To终值[Step步长]
   循环体
   [条件语句序列
   Exit For
   结束条件语句序列]
   Next [循环变量]
   在VBA中有三种取子串函数:left()函数用于在字符串左端开始取n个字符;Right函数用于在字符串右端开始取n个字符(注意子串中字符的顺序与母串中相同);Mid()函数可以实现在任何位置取任何长度的子串。字符串长度检测函数Len(<字符串表达式>或<变量名>)的作用是返回字符串所含字符数。本题中相当于每次循环从后向前取得str中的一个字符连接到S的后面,即最后S的值为abccba。