假定有以下函数过程: Function fun(S As String) Dim S1 As String For i=1 To Len(S) S1=LCaes(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 Str2 End SUb 程序运行后,单击命令按钮,如果在输入对话框中输入字符串“AbCDefG,则单击“确定”按钮后在窗体上的输出结果为( )。
A.ABCDEFG
B.abcdefg
C.GFEDCBA
D.gfedcba