过程调用与参数传递.pptVIP

* * * * * * * * * * * * * * * * * * 分析下列程序的值 Private Sub Command1_Click() Dim M As Integer, N As Integer M = 15: N = 20 Call Value_Change(M,N) Print M, N End Sub Private Sub Value_Change(X As Integer, by value Y As Integer) X=X+20 Y=X+Y Print “X=“;X,”Y=“;Y End Sub X=35 y=55 M=35 N=20 第31页，共50页，2022年，5月20日，10点12分，星期六 15 20 返回地址 1000(地址) 20 M N X Y 1000 1002 1004 1005 1003 35 20 返回地址 1000（地址) 55 M N X Y 1000 1002 1004 1005 1003 第32页，共50页，2022年，5月20日，10点12分，星期六 Private Sub Form_Click() Dim sum As Integer, i As Integer