单选题
设有如下程序:Private Sub Inv(ByVal xStr As String,As String) Dim tStr As String Dim L AS Integer L=Len(xStr) Do While L>=1 tStr=tStr+Mid(xStr,L,1):L=L-1 Loop yStr=tStr End Sub Private Sub Form_Click() Dim S1 As String,S2 As String S1="abcdef"Inv S1,S2 Print S2End Sub运行程序,单击窗体,输出结果为