[算表] sub a()的k值 如何套入sub bb()

[waiter337 (給開司一罐蘇格登)]

軟體:

版本:
目前想將大程式切成比較小部份

Sub a()

K=1

While k<5
If k=3 then
bb
End if
   K=k+1

Wend
End sub

----------------------
Sub bb()
K=k+2
End sub

當他進入bb時
K就變成無任何值了

想請問如何將k值帶入bb

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 223.139.82.230
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1475506451.A.0A9.html
※ 編輯: waiter337 (223.139.82.230), 10/03/2016 22:55:33
→ soyoso: bb()括號內傳值、址方式
→ soyoso: 或於宣告變數於程序外，同模組不同程序dim，不同模組
→ soyoso: 或同模組可用public
Sub a()

k = 1

While k < 5
If k = 3 Then
call bb (k)
End If
   k = k + 1

Wend
End Sub
-----------------
Sub bb(k)
k = k + 2
End Sub

成功
※ 編輯: waiter337 (114.35.158.244), 10/03/2016 23:49:14
※ 編輯: waiter337 (114.35.158.244), 10/03/2016 23:54:26