在以下事件中，Private表示 Private Sub sub1(x As Integer，y As Integer) ...End Sub

A．此过程可以被其他过程调用

B．此过程只可以被本窗体模块中的其他过程调用

C．此过程不可以被任何其他过程调用

D．此过程只可以被本工程中的其他过程调用

[单选题]编写如下事件过程： 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" sub

[单选题]在以下事件过程中，Private表示（）。Private Sub txtName_Change（）EndSubA . 此过程可以被任何其它过程调用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

[试题]设有如下窗体单击事件过程：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打开窗体运行后，单击窗体，则消息框的输出结果是______。

[单选题]C．ommand1_Click()事件代码如下： Private Sub Command1_Click() Dim x As Integer, Y As Integer x = 6 : Y : 8 Call ABC(X, Y) Print X; Y End Sub Private Sub ABC(ByVal X As Integer，Y As Integer) X = X + 4 Y = Y = 2 End Sub 事件发生后，X和Y的值分别为 ______。A．6, 8B．10, 10C．10

[单选题]下列事件过程：Private Sub Command1_ Click() MsgBox Str (123+123)End Sub运行时，信息框中出现的结果是______。A．123+123B．123C．246D．显示出错信息

[单选题]有如下事件过程： Private Sub Commaild1_Click( ) Dim i As Integer For i =1 To 2 DC Next i End Sub Sub DC( ) Dim x As Integer，m As String Static y，n x=x + 1 y=y + 1 m=m&"*"：n=n &"#" Print x，y，m，n End Sub 程序运行后，输出的结果是A．1 1 * # 1 1 * #B．1 1 * # 1 2 *

[单选题]编写如下事件过程： 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．同

[试题]设有以下窗体单击事件过程：Private Sub Form_Click()a=1F．or i=1 To 3E．nd SelectNext iE．nd Sub打开窗体运行后，单击窗体，则消息框的输出内容是( )。

[单选题]运行下列程序:Private Sub Command1_Click( )x = 3If x < 3 Then Print x £« 3;If x < 4运行下列程序：Private Sub Command1_Click( )x = 3If x < 3 Then Print x + 3;If x < 4 Then Print x + 4;If x < 5 Then Print x + 5;If x < 6 Then Print x + 6;PrintE．nd Sub单击Co