下列程序的执行结果为 Private Sub Command1_Click()
题型：单项选择题
问题：
下列程序的执行结果为
Private Sub Command1_Click()
Dim s1 As String，s2 As String
S1；="abcdef"
Call Invert(s1，s2)
Print s2
End Sub
Private Sub Invert (ByVal xstr As String，ystr As String)
Dim tempstr As String
i=Len(xstr)
Do While i>=1
tempstr=tempstr+Mid(xstr，i，1)
i=i-1
Loop
ystr=tempstr
End Sub
A．fedcba
B．abcdef
C．afbecd
D．defabc