【单选题】下列程序的执行结果为 Private Sub Command1_Click() Dim FirStr As String FirSt='abcdef' Print Pat(FirStr) End Sub Private Function Pat(xStr As String) As String Dim tempStr As String, strLen As Integer tempStr=''...
【单选题】下列程序的执行结果为 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=...
【单选题】下列程序的执行结果为 Private Sub Command1_Click() Dim FirStr As String FtrSt='abcdef' Print Pat(FirStr) End Sub Private Function Pat(xStr As String)As String Dim tempStr As String,strLen As Integer tempStr='' s...