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

admin2019-03-14  21

问题 窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:
    Dim y As Integer
    Private Sub Command1_Click()
    Dim x As Integer
    x=2
    Text1.Text=p2(pl(x),y):Text2.Text=pl(x)
    End Sub
    Private Function pl(x As Integer)As Integer
    x=x+y:y=x+y
    pl=X+y
    End Function
    Private Function p2(x AS Integer,y As hteger)
AsInteger
    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/XpFp777K
0

最新回复(0)