(24) 在窗體上畫一個名稱為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