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

admin2006-08-15  82

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

解析 因为输入的6满足条件n\2=n/2,所以执行f=f1(n),而f1里形参类型为ByRef即址传递,所以在函数里形参的改变会影响到实参。
转载请注明原文地址:https://kaotiyun.com/show/6r2p777K
0

随机试题
最新回复(0)