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

admin2021-04-27  29

问题 执行下面的程序,消息框里显示的结果是_________。
    Private Sub Form_Click()
    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
Fnd Sub

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

答案B

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

最新回复(0)