问题
单项选择题
在窗体上画一个名称为Text1的文本框,一个名称为Command1的命令按钮,然后编写如下事件过程和通用过程: Private Sub Command1_Click() n = Val(Text1.Text) If n\2 = n/2 Then f = f1(n) Else f = f2(n) End If Print f; n End Sub Public Function f1(ByRef x) x=x*x f1=x+x End Function Public Function f2(ByVal x) x=x*x f2=x+x+x End Function 程序运行后,在文本框中输入6,然后单击命令按钮,窗体上显示的是
A.72 36
B.108 36
C.72 6
D.108 6
答案
参考答案:A
解析:解析:因为输入的6满足条件n\2=n/2,所以执行f=f1(n),而f1里形参类型为ByRef即址传递,所以在函数里形参的改变会影响到实参。