问题
单项选择题
在窗体上画一个命令按钮,其名称为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。