编写如下事件过程： Private sub sub1 (ByVal x1 As String, y1 As String)Dim xt As StringDim i As Integeri = Len(x1)Do While i＞= 1 xt = xt + Mid(x1, i, 1) i=i-1Loopy1 = xt End Sub Private Sub Form Click()Dim s1 As String, s2 As Strings1= "teacher"sub1 s1, s2Print s2 End Sub 程序运行后，单击窗体，则窗体上显示的内容是

A．rehcaet

B．tahreee

C．themee

D．eerthea

某正规院校暑期组织学生到某地参加“夏令营”活动，车站（列车）（）。

A.不得发售学生票

B.凭学校书面证明，可以发售学生票

C.凭学校书面证明，列车同意可以在列车上补办学生票

D.可以发售学生票