[填空题] 设有如下程序Private Sub Fom1

[填空题] 设有如下程序

Private Sub Fom1_Click( )

Dim s As Integer，b As Integer

a=20：b=50

p1 a，b

p2 a，b

p3 a，b

Print"a="；a，"b=";b

End Sub

Sub pl(x As Integer，ByValy As Integer)

x=x+10

y=y+20

End Sub

Sub p2(ByVal x As Integer，y As Integer)

x=x+10

y=y+20

End Sub

Sub p3(ByVal x As Integer，ByValy As Integer)

x=x+10

y=y+20

End Sub

该程序运行后，单击窗体，则在窗体上显示的内容是：a= 【9】 和b= 【10】 。

[9]30 [10] 70

传地址表示参数的传送是对址的传送，变量的原值会在调用过程时被覆盖，但传值不同，传值传送的是参数的副本，变量的值不会发生改变。本题经过三次调用，a与b分别被传地址(ByRef，默认时省略)一次，故输出时，a、b的值分别在20、50的基础上加10、20。