[单项选择题] 在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程： Private Sub Command1_Click() n=Va

15 查阅

[单项选择题] 在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程：

Private Sub Command1_Click()

n=Val(Text1. Text)

If n2=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

f1=x+x+x

End Function

程序运行后，在文本框中输入6，然后单击命令按钮，窗体上显示的是______。

A．72 36

B．108 36

C．72 6

D．108 6

参考答案:

A解析：[分析]：当在文本框中输入6时，条件“n2=n/2”成立，调用f1函数过程。在过程的计算中，变量x的值为36，函数名f1为72。由于x是被定义为“ByRef”(按址方式传送)，所以将36反传送给实参n，函数名f1也将72返回给变量f。最后在窗体上显示的是72和36。