(33)假定有以下函数过程: Function Fun(S As String)As String Dim s1 As String For i=1 To Len(S) s1=LCase(Mid(S, i, 1))+s1 Next i Fun=s1 End Function 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Dim Str1 As String, Str2 As String Str1=InputBox('请输入一个字符串') Str2=Fun(Str1) Print Srt2 End Sub 程序运行后,单击命令按钮,如果在输入对话框中输入字符串“abcdefg”,则单击“确定”按在窗体 上的输出结果为( )。 A)ABCDEFG B)abcdefg C)GFEDCBA D)gfedcba