问题 单项选择题

在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序:
Function Func(ByVal x As Integer,y As Integer)
y=x*y
If y>0 Then
Func=x
Else
Func=y
End If
End Function
Private Sub Command1_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。

单项选择题
判断题