下列程序代码段中,在单击命令按钮调用SelMid函数时,其运行结果为( )。 Private Function SelMid(aSlr AS String)As String Dim temp As String,sLen As In

admin2017-11-27  55

问题 下列程序代码段中,在单击命令按钮调用SelMid函数时,其运行结果为(    )。
    Private Function SelMid(aSlr AS String)As String
    Dim temp As String,sLen As Integer
    temp="":sLen=Len(aStr)
    i=1
    Do While i<=sLcn/2
    temp=temp+Mid(aStr,i,1)+Mid(aStr,sLen-i+1,1)
    i=i+1
    Loop
    SeMid=temp
    End Function
    Private Sub Command1_Click()
    Dim SirAs String
    Str="abcdef":Print SelMid(Str)
    End Sub

选项 A、abcdef
B、afbecd
C、fedcba
D、defabc

答案B

解析 本题考查函数过程分析。单击命令按钮时,事件过程内部调用SelMid函数。SelMid函数的功能是,将字符串重组,重组的规则是:从原字符串中前后各取一个字符重新连接起来并存入中间变量temp中(追加到中间变量原有字符的后面);然后再取原字符串中的前面第2个和倒数第2个字符连接起来,再连接到变量temp中;以此类推,直到将原字符串中的字符全部追加到变量temp中为止。
转载请注明原文地址:https://kaotiyun.com/show/q5Gp777K
0

最新回复(0)