【单选题】

下列程序代码段中，在单击命令按钮调用SelMid函数时，其运行结果为()。

Private Function SelMid(aStrAs String)As String
Dim tempAs String
Dim sLenAs Integer
temp=""
sLen=Len(aStr)
i=1
Do While i＜=sLen/2
temp=temp+Mid(aStr,i,1)+Mid(aStr,sLen-i+1,1)
i=i+1
Loop
SelMid=temp
End Function
Private SubCommand1_Click()
Dim StrAs String
Str="abcdef":Print SelMid(Str)
End Sub
A、abcdef B、afbecd C、fedcbaD、defabe