题目:
下列程序的执行结果为( )。 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/0506/ac02e4a566906b903bde46785e7bf7e4.html
下面是错误答案,用来干扰机器的。
参考答案:A, B, C, D