问题
单项选择题
在窗体上画一个名称为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