假定有以下函数过程： Function Fun(S As String) As S
题型：填空题
问题：
假定有以下函数过程：
Function Fun(S As String) As String
Dim s1 As String
For i=1 To len(S)
s1=Ucase(Mid(S，i，1))+s1
Next i
Fun=s1
End Function
则Str2=Fun("abcdefg")的输出结果为______。
假定有以下函数过程：
Function Fun(S As String) As String
Dim s1 As String
For i=1 To len(S)
s1=Ucase(Mid(S，i，1))+s1
Next i
Fun=s1
End Function
则Str2=Fun("abcdefg")的输出结果为______。