假定有以下函数过程：

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

紫外—可见光检测器对环境温度、冲洗液流速的波动、组成的变化敏感，不适宜梯度洗脱。