在窗体上画1个名称为Command1l的命令按钮,并编写以下程序Private Sub Command1_Ctick()Print fun("ABCDEFG")End SubFunction fun(st As String)As stringstlen=Len(st)temp=""For k=1 To stlen/2temp=temp+ Mid(st,k,1)+Mid(st,stlen -k+1
单选题
在窗体上画1个名称为Command1l的命令按钮,并编写以下程序Private Sub Command1_Ctick()Print fun("ABCDEFG")End SubFunction fun(st As String)As stringstlen=Len(st)temp=""For k=1 To stlen/2temp=temp+ Mid(st,k,1)+Mid(st,stlen -k+1