编写如下事件过程: Private sub sub1 (ByVal x1 As String, y1 As String) Dim xt As String Dim i As Inte

admin2009-02-13  26

问题 编写如下事件过程:         Private sub sub1 (ByVal x1 As String, y1 As String)               Dim xt As String               Dim i As Integer               i = Len(x1)               Do While i>= 1                     xt = xt + Mid(x1, i, 1)                     i=i-1               Loop               y1 = xt         End Sub          Private Sub Form Click()               Dim s1 As String, s2 As String               s1= "teacher"               sub1 s1, s2               Print s2         End Sub     程序运行后,单击窗体,则窗体上显示的内容是

选项 A、rehcaet
B、tahreee
C、themee
D、eerthea

答案1

解析 可以看出,Sub1(ByVal x1 As String,y1 As String)的作用是将参数x1的字符逆序处理,然后赋给y1,而y1是传址引用的,可以直接返回处理结果。
转载请注明原文地址:https://kaotiyun.com/show/1b1p777K
0

最新回复(0)