编写如下事件过程： 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

[单选题]在以下事件中，Private表示 Private Sub sub1(x As Integer，y As Integer) ...End SubA．此过程可以被其他过程调用B．此过程只可以被本窗体模块中的其他过程调用C．此过程不可以被任何其他过程调用D．此过程只可以被本工程中的其他过程调用

[单选题]在窗体中添加一个命令按钮,编写如下程序:Private Sub Sub1(p,m,n)p=p+1:m=m+1:n=n+1Print "sub1:";p;m;nE．nd SubPrivate Sub Command1_Click()a1=1:b=2:c1=3C．all Sub1(a,b1+3,c1)Print"Main:";a1;b1;c1E．nd Sub程序运行后,输出结果为A．Sub: 2 6 4 Main: 2 6 4B．Sub: 2 6 4 Main: 2 6 4C．Sub: 2

[单选题]假定有如下的Sub过程:Sub Sub1(x As Single, y As single)t=xx=t / yy=t Mod yE．nd Sub在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()D．im a As SingleD．im b As Singlea=5b=4Sub1 a,bPrint a;bE．nd Sub程序运行后,单击命令按钮,输出结果为A．54B．] 1]]1C．] 1.2]]5.4D．] 1.

[单选题]假定有如下的Sub过程：Sub Sub1 (x As Single, y As Single) t=x x = t/y y = t Mod yEnd Sub 在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_ Click() Dim a As Single Dim b As Single a = 5 b = 4 Sub1 a, b Print a; b End Sub 程序运行后，单击命令按钮，输出结果为______。A．5 4B．1 1C．1.2 5.4D

[单选题]编写如下事件过程： Private Sub Form-MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If Shift=6 And Button=2 Then Print"Hello" End If End Sub 程序运行后，为了在窗体上输出“Hello”，应在窗体上执行以下( )操作。A．同时按下Shift键和鼠标左键B．同时按下Shift键和鼠标右键C．同时按下Ctrl、Alt键和鼠标左键D．同

[单选题]假定有如下的Sub过程：Sub Sub1(x As Single，y As single)t=xx=t/yy=t Mod yE．nd Sub在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_click()D．im a As SingleD．im b As Singlea=5b=4Sub1 a，bPrint a；bE．nd Sub程序运行后，单击命令按钮，输出结果为A．B．C．D．

[单选题]编写如下事件过程和函数过程： Private Sub Command1_Click() Dim num(1 To 6) As Single num(1)=103: num(2)=190: num(3)=0 hum(4)=32:num(5)=-56: num(6)=100 Print Print p2(6,num()) End Sub Private Function p2(ByVal n As Integer, number() As Single) As Integer p2=number(1

[单选题]编写如下事件过程：Private Sub Form_ MouseDown(Button As Integer，Shift As Integer，X As Single， Y As Single) If Shift=6 And Button=2 Then Print "BBBB" End IfEnd Sub程序运行后，为了在窗体上输出“BBBB”，应执行的操作为______。A．同时按下Shift键和鼠标左键B．同时按下Shift键和鼠标右键C．同时按下Ctrl、Alt键和鼠标左键D．同时按下

[单选题]编写如下事件过程： Private Sub Form. MouseDown(Button As Integer，Shift As Integer，X As Single， Y As Single) If Shift=6 And Button=2 Then Print "BBBB" End If End Sub 程序运行后，为了在窗体上输出“BBBB”，应执行的操作为 ______。A．同时按下Shift键和鼠标左键B．同时按下Shift键和鼠标右键C．同时按下Ctrl、Alt键和鼠标左键D．

[试题]设有如下窗体单击事件过程：Private Sub Form Click( )x=1F．or i=1 To 3Select Case IC．ase 1,3x=x+3C．ase 2,4x=x-2E．nd SelectNext IMsgBox xE．nd Sub打开窗体运行后，单击窗体，则消息框的输出结果是______。