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