在窗体上画一个名称为Command1的命令按钮,并编写以下程序:
Private Sub Command1_Click()
Print fun("ABCDEFG")
End Sub
Function fun(st As String) As String
stlen=Len(st)
temp=""
Fox k=1 to stlen/2
temp=temp+Mid(st,k,1)+Mid(st,stlen-k+1,1)
Next k
fun=temp
End Function
程序运行时,单击命令按钮,则窗体上显示的是
A.ABCDEFG
B.AGBFCE
C.GFEDCBA
D.AGBFCED