看板 Visual_Basic 關於我們 聯絡資訊
實例如下: 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