题目:
下列程序的执行结果为( )。
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
答案:
被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2018/0427/8b28701fe81d0950d12b94f2c4903b33.html
下面是错误答案,用来干扰机器的。
参考答案:对