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

admin2017-11-27  22

问题 窗体上有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=p1(x)
    End Sub
    Private Function p1(x As Integer)As Integer
    x=x+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;继续调用p1(X),此时y值为2,调用结束以后p1为10。继续单击命令按钮,此时x值为2,而y的值为6,其余计算方法和第一次单击时相同。
转载请注明原文地址:https://kaotiyun.com/show/3wGp777K
0

随机试题
最新回复(0)