[VBA ] 怎麼把物件傳給另一個function?

[sun3star (好煩呀)]

我一共有四個option button

我在main function執行時,
想要把其中一個option button傳給另一個function
讓那function把option button的value變成true (就是選取的意思)

所以我這樣寫:
Private Sub Main()
    ..... (省略)
    OptionChoose Op1
    ..... (省略)
End sub

Private Sub OptionChoose(Opt As Optionbutton)
    Op1.Value = False
    Op2.Value = False
    Op3.Value = False
    Op4.Value = False

    Opt.Value = True
End Sub

可是執行到OptionChoose Op1 時
它就run error, 說type mismatch..
此時op1是已選取的, 所以op1.value= true
我看到OptionChoose Op1..是把Op1當成Op1.value傳過去
而不是傳物件

我試過把function寫成OptionChoose(ByRef Opt As Optionbutton) 也不行

請教各位大大..要怎麼把option button的控制權傳給另一個function

--

  反正都要死　　早晚有分別？？

  好好過好自己的人生, 別後悔才最重要

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 202.175.79.186
→ Yaiba:可以考慮使用陣列，那就只要傳index過去，就可以處理了