下列程序的执行结果为( )。 Private Sub Command1_Click() 　　Dim s1 As String,s2 As String 　　s1="abcdef" 　　Call Invert(s1,s2)

admin2012-03-22 22

问题下列程序的执行结果为( )。 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

答案A

解析

转载请注明原文地址:https://kaotiyun.com/show/7Hhp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类