已知有下面过程： Private Sub proc1(a As Integer,b As String,Optional x As Boolean) ...... End Sub 正确调用此过程的语句是______。

A．Call procl(5)

B．Call procl 5,"abc",False

C．procl(12,"abc",True)

D．procl 5,"abc"

[单选题]（ 23 ）已知有下面的过程（ ）Private Sub proc1 （ a As Integer,b As String,Optional x As Boolean ）……E．nd Sub正确调用此过程的语句是A． ） Call procl （ 5 ）B． ） Call proc1 5, ” abc ” ,FalseC． ） proc1 （ 12, ” abc ” ,True ）D． ） proc1 5, “ abc ”

[单选题]单击按钮时，以下列程序运行后的输出结果是 Private Sub proc1(x As Integer，y As Integer，z As Integer) x=3*z y=2*z z=X+y End Sub Private Sub Command1_Click( ) Dim x As Integer，y As Integer，z As Integer x=1：y=2：z=3 Call proc1(x，x，2) Print x；x；z Call proc1(x，y，y) Print x；y；y

[单选题]有下列事件过程： Private Sub Command1_Click() b = 10 Do Until b = -1 a = InputBox(＂请输入a的值＂） a = Val(a) b = InputBox(＂请输入b的值＂） b = Val(b) a = a * b Loop Print End Sub程序运行后，依次输入数值30，20，10，-1后，输出结果是。A. 6000 B. -10 C. 200 D. -6000

[试题]有一过程如下:Sub Sub1(m As Integer,total As Long)D．im i As Integertotal=1F．or i=1 To mtotal=total*iNextE．nd Sub调用它的事件过程如下:Private Sub Command1_Click()D．im tot As Long,a As Integera=Val(InputBox("请输入数据"))C．all Sub1(a,tot)Print totE．nd Sub则输入数据5,运行结果为[ ]。

[单选题]有以下程序： Sub subP(b()As Integer) For i=1 To 4 b(i)＝2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4)As Integer a(i)＝5 a(2)＝6 a(3)＝7 a(4)＝8 subP a() For i＝1 To 4 Print a(i) Next i End Sub 运行上面的程序，单击命令按钮，输出结果为______。A． 2 4 6 8B．5 6 7 8C．10 12

[单选题]有程序如下: Sub subP(b() As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub运行上面程序，单击命令按钮，输出结果为______ 。A． 2 4 6 8B．5 2 2 2C．10 1

[单选题]有以下程序： Sub subP(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4)As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subPa() For i=1 To 4 Print a(i) Next i End Sub 运行上面的程序，单击命令按钮，输出结果为( )A．2 4 6 8B．5 6 7 8C．10 12 14 16

[单选题]有下列事件过程：Private Sub Command1_Click()b=10D．o Until b=-1a=InputBox("请输入a的值")a=Val(A)b=InputBox("请输入b的值")b=Val(B)a=a*bLoopPrint aE．nd Sub程序运行后，依次输入数值30,20,10,-1后，输出结果是( )。A．6000B．-10C．200D．-6000

[单选题]编写如下事件过程：Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)Print

[单选题]窗体的MouseUp事件过程如下：Private Sub Form_MouseUp（Button As Integer, Shift As Integ