执行下面的程序,消息框里显示的结果是________。 Private Sub Form_Click() Dim Str As String,S As String,k As Integer Str=”abe”:S=Str F

admin2021-06-03  21

问题 执行下面的程序,消息框里显示的结果是________。
  Private Sub Form_Click()
    Dim Str As String,S As String,k As Integer
    Str=”abe”:S=Str
     For k=Len(Str)To 1 Step—1
    S=S&(Mid(Str,k,1))
    Nextk
    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/d6vp777K
0

最新回复(0)