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