VB字符串反向输出的题目

题目是这样的：
假定有以下函数过程：
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 Str2
End Sub
程序结束后，单击命令按钮，如果再输入对话框中输入字符串"abcdefg"，单击确定按钮后在窗体上输出的结果为________。
(A).ABCDEFG
(B).abcdefg
(C).GFEDCBA
(D).gfedcba
为什么选D啊，在线。急！！！

选B i=len(s) to 1 step=-1才选D

楼上的说法正确,代码如下,你在text1中输入原字符串后按command1按钮text2中就出现与原字符串逆序的字符串: dim str as string private sub form_click() text1 = "" text2 = "" end sub private sub command1_click() str = text1 text2 = strreverse(str) end sub