问题 单项选择题

在窗体上画一个名称为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(By Val x)
x=x*x
f2=x+x+x
End Function
程序运行后,单击命令按钮,在窗体上显示的是 ______。

A.72 36

B.108 36

C.72 6

D.108 6

答案

参考答案:A

解析:[评析] 在本题中,文本框中输入的是6,也就是n=6,n\2=n/2条件成立,所以执行f=f1(n)语句,调用f1过程,得到x=x*x=6*6=36,f1=36+36=72。由于函数f1中,参数是按地址传递的,故参数的值会返回,所以 n的值为36。

单项选择题
单项选择题 A1/A2型题