解答VB程序试题
解答VB程序试题
日期：2016-07-26 00:11:12 人气：1
''1、将输入字符串“abcdef”输出为”fedcba”
Private Sub Invert(ByVal xStr As String, yStr As String)
Dim tempStr As String
Dim I As Integer
I = Len(xStr)
Do While I >= 1
tempStr = tempStr + Mid(xStr, I, 1)
I = I - 1
Loop
yStr = tempStr
End Sub
P