在窗体上画一个名称为Text1的文本框,一个名称为Command1的命令按钮,然后编写 如下事件过程和通用过程: Private Sub Command1_Click() n=Val(Text1.Text) If n\2

admin2009-01-15  26

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

答案1

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

最新回复(0)