填空题有下列程序，运行后变量x1、y1和z1的结果分别是【13】、【14】和【15】。
Private Sub fun1(s，m，n)
s = m + 1
m = n + 2
n = s + 3
End Sub
Private Sub form Click()
Dim x1， y1
x1 = 1 ：y1 = 1 ：z1 = 1
Call fun1(x1，y1 + 1，(z1))
Debug．Print x1； y1； z1
End Sub

1、

【正确答案】 1、{{*HTML*}}[13] 3
[14] 1
[15] 1

【答案解析】[分析] 对于按地址传递的形式参数，如果在过程调用时与之结合的实参是一个常数，将它放在括号内或者表达式中，那么Visual Basic就会用“按值传递”的方法来处理它。