窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序: Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1.Text=Fun2(F

admin2010-11-20  27

问题 窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:
Dim y As Integer
Private Sub Command1_Click()
Dim x As Integer
x=2
Text1.Text=Fun2(Fun1(x),y)
Text2.Text=Fun1(x)
End Sub
Private Function Fun1(x As Integer) As Integer
x=x+y:y=x+y
Fun1=x+y
End Function
Private Function Fun2(x As Integer,y As Integer)  As Integer
Fun2=2*x+y
End Function
当单击1次和单击2次命令按钮后,文本框Text1和Text2内的值分别是

选项 A、2  4
2  4

B、2  4
4  8

C、10  10
58  58

D、 4  4
8  8


答案C

解析 函数Fun1和Fun2都是传值调用,其中,Text1文本框中的内容使用了嵌套调用。实参X是过程变量,实参Y是窗体变量。
转载请注明原文地址:https://jikaoti.com/ti/Fsg0FFFM
0

最新回复(0)