假定有下列函数过程:
Function Fun(S As String) As String
Dim s1 As String
For i= 1 To Len(S)
s 1 =Mid(S,i, 1)+s1
Next i
Fun = s1
End Function
窗体上有一个命令按钮Command 1, 然后编写如下事件过程:
Private Sub Command 1 _ Click ()
Dim Str 1 As String,Str2 As String
Str 1 = inputbox(“请输入 一个字符串”)
Str2 = Fun (Str 1)
Print Str2
End Sub程序运行后,单击命令按钮,如果在输入对话框中输入字符串“12abc34”, 则单击 “确定”按钮后在窗体上的输出结果为________。
程序运行后,单击命令按钮,如果在输入对话框中输入字符串“12abc34”, 则单击 “确定”按钮后在窗体上的输出结果为________。
43cba21