Re: [问题] 传址传值

楼主: gongjue (塔罗小米)   2011-11-12 13:17:24
※ 引述《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
作者: tsiteowy (有理想的男人)   2011-02-05 00:46:00
找到答案了吗? 你要不要先说说为什么觉得是1,再帮你解答

Links booklink

Contact Us: admin [ a t ] ucptt.com