窗体上有1个名称为Commandl的命令按钮,事件过程及函数过程如下: Private Sub Commandl Click() Dim mAs String m;InputBox(“请输入字符串”) Print pick_str(m) End Sub

admin2015-12-09  34

问题 窗体上有1个名称为Commandl的命令按钮,事件过程及函数过程如下:
Private Sub Commandl Click()
Dim mAs String
m;InputBox(“请输入字符串”)
Print pick_str(m)
  End Sub
Private Function pickstr(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+

选项 A、bcai
B、cbia
C、bcais
D、曲ias

答案A

解析 本题的函数中使用了Do循环,循环条件是i<=sLen/2;由于字符串的长度为5,所以循环会执行两次;在每次循环中使用Mid函数依次取得字符串的第一个字符、最后一个字符、第二个字符、倒数第二个字符。
转载请注明原文地址:https://jikaoti.com/ti/8tJ0FFFM
0

随机试题
最新回复(0)