excel vba checkbox指定只能選擇一個

http://tw.knowledge.yahoo.com/question/question?qid=1510112203097





當我有3個甚至是4個checkbox的時候,假設我要只能選擇一個checkbox1其他都不能做選擇,但是當checkbox1解除時其他就可以選。
我用2個checkbox時做的出來但是當我用到第3個的時候就出現問題了,這是我寫的程式。
Private Sub CheckBox1_Click()
If CheckBox1 = True Then CheckBox2.Locked = True And CheckBox1.Locked = False And CheckBox3.Locked = True
If CheckBox1 = False Then CheckBox2.Locked = False And CheckBox3.Locked = False

End Sub


Private Sub CheckBox2_Click()
If CheckBox2 = True Then CheckBox1.Locked = True And CheckBox2.Locked = False And CheckBox3.Locked = True
If CheckBox2 = False Then CheckBox1.Locked = False And CheckBox3.Locked = False
End Sub


Private Sub CheckBox3_Click()

If CheckBox3 = True Then CheckBox2.Locked = True And CheckBox1.Locked = True And CheckBox3.Locked = False
If CheckBox3 = False Then CheckBox2.Locked = False And CheckBox1.Locked = False
End Sub





















<h3> 最佳解答</h3>
  • 發問者自選





回答者:




擅長領域:



回答時間:



iam_1_001 ( 研究生 4 級 )

商務應用 | VisualBasic
2010-11-22 23:11:27



[ 檢舉 ]












4個checkbox的時候,只能選擇一個checkbox1其他都不能做選擇,但是當checkbox1解除時其他就可以選

checkbox1_不用去設定.

Private Sub CheckBox2_Click()
If CheckBox1 = True Then
CheckBox2.Locked = True
Else
CheckBox1 = True
CheckBox2.Locked = False
End If

CheckBox3_CheckBox4....等___請參考上述CheckBox2的設定

希望有幫上忙.

留言

這個網誌中的熱門文章

歐姆龍 HEM-7600T 評價,購買心得分享(打臉文)

超任 三國志3代,登入武將金手指

年青人眼鏡評價(負評),辛酸血淚史分享文