单击窗体时,下列程序的执行结果是  Private Sub Invert(By Val xstr As String,ystr As String)    Dim tempstr AS String    Dim I AS Integer    I=Len

admin2009-01-15  49

问题 单击窗体时,下列程序的执行结果是  Private Sub Invert(By Val 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  Private Sub Form_Click( )    Dim s1 As String,s2 As String    S1="abcdef"    Invert S1,S2    Print S2  End Sub

选项 A、abcdef
B、afbecd
C、fedcba
D、defabc

答案4

解析 Invert(By Val xstr As String,ystr As String)的作用是将参数xstr的字符逆序处理,然后赋值给ystr,而ystr是按地址引用的,可以直接返回处理结果。
转载请注明原文地址:https://jikaoti.com/ti/Lp80FFFM
0

最新回复(0)