问题 单项选择题

在窗体上画一个命令按钮,其名称为Commandl,然后编写如下程序:
Function Fonc(By Val x As Integer,y As InteSer)
y=x*y
If y>0 Then
Func=X;
Else
Func=y
End If
End Function
Private Sub Commandl_Click()
Dim a As Integer,b As Integer
a=3
b=4
c=Func(a,B)
Print"a=";a
Print"b=";b
Print"C=";C
End Sub
程序运行后,单击命令按钮,其输出结果为______。

A.a=3 b=12 c=3

B.a=3 b=4 c=3

C.a=3 b=4 c=12

D.a=13 b=12 c=12

答案

参考答案:A

解析:[评析] 函数Func(3,4)的返回值为3,故c的值为3。由于参数x是按值传递的,a的值仍为3;而参数y是按地址传递的,b的值变为3*4。

单项选择题
单项选择题