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

admin2018-05-08  22

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

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

答案B

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

随机试题
最新回复(0)