单选题 窗体上有1个名称为Commandl的命令按钮,事件过程及函数过程如下:Private Sub Commandl _Click()Dim m As String m=InputBox("请输入字符串") Print pick_str(m)End SubPrivate Function pick_str(s As String)As String temp="":i=1:sLen=Len(s) Do While i<=sLen/2 temp=temp+Mid(s,i,1)+Mid(s,sLen-i+1,1) i=i+1 Loop pick_str=tempEnd Function运行程序,单击命令按钮,并在输入对话框中输入“basic”,则在窗体上显示的内容为
【正确答案】 A
【答案解析】解析:本题的函数中使用了Do循环,循环条件是i<=sLen/2;由十字符串的长度为5,所以循环会执行两次;在每次循环中使用Mid函数依次取得字符串的第一个字符、最后一个字符、第二个字符、倒数第二个字符。