若有一个过程定义成Public Sub W1（ByVal x A

（ 33 ）若要在子过程 Procl 调用后返回两个变量的结果，下列过程定义语句中有效的是

A Sub Procl(n,m)

B Sub Procl(ByVal n,m)

C Sub Procl(n,ByVal m)

D Sub Procl(ByVal n,ByVal m)

下列过程定义语句中，形参个数为不确定数量的过程是（ ）。

A．Private Sub Pro3（x As Double,y As Single）

B．Private Sub Pro3（Arr（3）,Option x,Option y）

C．Private Sub Pro3（ByRef x,ByVal y,Arr（ ））

D．Private Sub Pro3（ParamArray Arr（ ））

（ 33 ）在过程定义中有语句： Private Sub GetData (ByVal data As Integer)其中 “ ByVal ” 的含义是（ ） 。

A ）传值调用

B ）传址调用

C ）形式参数

D ）实际参数

A、Public Sub Sum(x ; y)

B、Public Sub Sum(ByVal x, ByVal y)

C、Public Sub Sum(x As Integer,y As Integer)

D、Public Sub Sum(x%, y%)

若要在子过程Procl调用后返回两个变量的结果，下列过程定义语句中有效的是______。

A．Sub Procl(n, m)

B．Sub Procl(ByVal n, m)

C．Sub Procl(n, ByVal m)

D．Sub Procl(ByVal n, ByVal m)

若要在子过程Procl调用后返回两个变量的结果，下列过程定义语句中有效的是( )。

A．Sub Proc1(n，m)

B．Sub Proc1(ByVal n，m)

C．Sub Proc1(n，BYVal m)

D．Sub Proc1(ByVal n，ByVal m)

下面的过程定义语句中不合法的是（ ）。

A．Sub Para（ByVal n（） ）

B．Sub Para（n） As Integer

C．Function Para（ByVal n）

D．Function Para（proc1）

（ 27 ）要想在过程 Proc 调用后返回形参 x 和 Y 的变化结果，下列定义语句中正确的是

A ） Sub Proc （ x as Integer,y as Integer ）

B ） Sub Proc （ ByVal x as Integer, y as Integer ）

C ） Sub Proc （ x as Integer,Byval y as Integer ）

D ） Sub Proc （ Byval x as Integer, Byval y as Integer ）

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub subl(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) z=x*x+y*y End Sub Private Sub Command1_Click() Dim a As Integer a=8 Call subl(1, 2,a) Print a End Sub 程序运行后，单击命令按钮，则窗体下显示的内容是______。

A．8

B．2

C．5

D．11

在过程定义中有语句：Private Sub GetData(ByVal data As Integer)，其中“ByVal”的含义是（ ）。

A.传值调用

B.传址调用

C.形式参数

D.实际参数