一道基础的VB题

Dim x%, y%, z%

Public Sub AA(ByVal z%)
y = z + x
z = x + y
End Sub
Public Function BB(y%)
y = y + 1
BB = x + y
End Function

Private Sub Form_click()
Dim x As Integer
x = 1
y = 2
Call AA(y + 1)
z = BB(x)
Print x, y, z
End Sub
答案是2，3，2

谁能给我具体解释下，谢谢

我算是得1，2，3

你的要是正确答案，我就不再想了，我看了两遍都是123