※ 引述《hatvito (please get中岛银)》之铭言：
: Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
: System.EventArgs) Handles MyBase.Load
: Dim x As Integer
: x = 3
: Call f1(x)
: Debug.Print(x)
: End Sub
: Sub f1(ByRef x As Integer)
: Call t2(x = x + x, x, x)
: End Sub
: Sub t2(ByRef a As Integer, ByVal b As Integer, ByRef c As Integer)
: a = a + 1
: b = b + 2
: c = a + b * c
: End Sub
: 结果是16
: 问题是出在A
: A执行结果是1
: 也就是说A收到的零
: 为什么呢？
我也想问， c=a+b*c ，c的值为什么是3，而不是1

找到答案了吗? 你要不要先说说为什么觉得是1,再帮你解答