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

admin2018-12-20  26

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

选项 A、2 4
2 4
B、2 4
4 8
C、10 10
58 58
D、4 4
8 8

答案C

解析 本题考查函数的调厢以及变量的作用域。在命令按钮单击事件中调用p2函数,p2函数的参数为函数p1,因此首先计算p1调用以后产生的结果。第一次调用函数p1,变量y为窗体级变量,p1调用结束后y为2,p1为4;调用p2,得到p2值为10,x的值为2;继续调用pl(x),此时y值为2,调用结束以后p1为10。继续单击命令按钮,此时x值为2,而y的值为6,其余计算方法和第一次单击时相同。
转载请注明原文地址:https://kaotiyun.com/show/BNFp777K
0

最新回复(0)