實例如下:
Sub Main()
Dim x As Integer = 1, y As Integer = 2
Test(x, y)
'因為x為傳址呼叫(ByRef),在 Main() 與 Test() 的變數 x 實際上為同一個變數,
'故 Test() 中改變 x 的值,Main() 中也會跟著改變
WriteLine(x) '結果為 9
WriteLine(y) '結果為 2
End Sub
Sub Test(ByRef x As Integer, ByVal y As Integer)
x = 9
y = 10
End Sub
--
▃▅▇▆▄ ▆▂▃ `
逝去感情如何能留住,半點癡情遺留殊不易,██▅▇▄▃ ▇▃▂" .
█████████▃i ▁▄▇
更多悽悽慘慘的遭遇…………██▆▃ █▅▆▃ˍ▄*
◢ ▂█▄▇▅▂▌.
我不知道,王~八~蛋~~! ▂▆███ █▄▃ 。fumizuki。Check。
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 60.248.175.60