5、復(fù)選框（Check Box）
（1）常用屬性
Caption——指定復(fù)選框所表示的選擇項的內(nèi)容。
value——返回或設(shè)置復(fù)選框的狀態(tài)。
其值為0時(默認(rèn)值，對應(yīng)常數(shù)為vbUnchecked)，表示復(fù)選框沒有選中；為1時（對應(yīng)常數(shù)為vbchecked），表示復(fù)選框處于選中狀態(tài)；為2時，表示復(fù)選框前面的v處于灰色模糊狀態(tài)（對應(yīng)常數(shù)為vbGrayed）。
Enabled——表示復(fù)選框當(dāng)前是否可用。
其值為True時，表示復(fù)選框為正?？捎脿顟B(tài)；為False時，表示復(fù)選框處于不可用狀態(tài)，此時運(yùn)行時選擇項內(nèi)容變?yōu)榈窨虪睢?BR> Check Box控件與Option Button控件有些相似，但在使用時有一個很大的不同，即CheckBox控件是彼此獨(dú)立工作的，它們互不相干，沒有絲毫的制約關(guān)系。只要您愿意，全選上或者一個也不選都可以。
CheckBox復(fù)選框控件有時也以組的形式出現(xiàn)，但即使是這樣，它們?nèi)匀皇呛敛幌喔傻?，給它們分組只是為了使界面上的復(fù)選框顯得含義清楚，比如我們總是把反映同一問題的復(fù)選框歸為一組。
（2）常用事件——Click（不支持雙擊）事件
CheckBox控件的常用事件為Click事件，用戶的單擊操作即觸發(fā)該事件。
（3）例子：
每次單擊復(fù)選框控件時都將使其Caption屬性以指示選中或未選中狀態(tài)（見教材P122）。
Private Sub Check1_Click()
If Check1.Value = 1 Then '當(dāng)check1被選中時
Check1.Caption = "checked"
ElseIf Check1.Value = 0 Then
Check1.Caption = "unchecked"
End If
End Sub
響應(yīng)鼠標(biāo)和鍵盤：
在鍵盤上使用[TAB]鍵并按[空格]鍵，由此將焦點轉(zhuǎn)移到復(fù)選框控件上，也會觸發(fā)復(fù)選框控件的Click事件。
也可以在Caption屬性的一個字母之前添加連字符“&”，創(chuàng)建一個鍵盤快捷方式來切換復(fù)選框控件的選擇。
如上例中：
Private Sub Check1_Click()
If Check1.Value = 1 Then '當(dāng)check1被選中時
Check1.Caption = "&checked" '定義快捷鍵
ElseIf Check1.Value = 0 Then
Check1.Caption = "un&checked"
End If
End Sub
則按“Alt+c”組合鍵將使控件在選中和未選中之間切換。
注意：這種快捷鍵定義方法對于菜單和許多其它控件同樣適用。
（1）常用屬性
Caption——指定復(fù)選框所表示的選擇項的內(nèi)容。
value——返回或設(shè)置復(fù)選框的狀態(tài)。
其值為0時(默認(rèn)值，對應(yīng)常數(shù)為vbUnchecked)，表示復(fù)選框沒有選中；為1時（對應(yīng)常數(shù)為vbchecked），表示復(fù)選框處于選中狀態(tài)；為2時，表示復(fù)選框前面的v處于灰色模糊狀態(tài)（對應(yīng)常數(shù)為vbGrayed）。
Enabled——表示復(fù)選框當(dāng)前是否可用。
其值為True時，表示復(fù)選框為正?？捎脿顟B(tài)；為False時，表示復(fù)選框處于不可用狀態(tài)，此時運(yùn)行時選擇項內(nèi)容變?yōu)榈窨虪睢?BR> Check Box控件與Option Button控件有些相似，但在使用時有一個很大的不同，即CheckBox控件是彼此獨(dú)立工作的，它們互不相干，沒有絲毫的制約關(guān)系。只要您愿意，全選上或者一個也不選都可以。
CheckBox復(fù)選框控件有時也以組的形式出現(xiàn)，但即使是這樣，它們?nèi)匀皇呛敛幌喔傻?，給它們分組只是為了使界面上的復(fù)選框顯得含義清楚，比如我們總是把反映同一問題的復(fù)選框歸為一組。
（2）常用事件——Click（不支持雙擊）事件
CheckBox控件的常用事件為Click事件，用戶的單擊操作即觸發(fā)該事件。
（3）例子：
每次單擊復(fù)選框控件時都將使其Caption屬性以指示選中或未選中狀態(tài)（見教材P122）。
Private Sub Check1_Click()
If Check1.Value = 1 Then '當(dāng)check1被選中時
Check1.Caption = "checked"
ElseIf Check1.Value = 0 Then
Check1.Caption = "unchecked"
End If
End Sub
響應(yīng)鼠標(biāo)和鍵盤：
在鍵盤上使用[TAB]鍵并按[空格]鍵，由此將焦點轉(zhuǎn)移到復(fù)選框控件上，也會觸發(fā)復(fù)選框控件的Click事件。
也可以在Caption屬性的一個字母之前添加連字符“&”，創(chuàng)建一個鍵盤快捷方式來切換復(fù)選框控件的選擇。
如上例中：
Private Sub Check1_Click()
If Check1.Value = 1 Then '當(dāng)check1被選中時
Check1.Caption = "&checked" '定義快捷鍵
ElseIf Check1.Value = 0 Then
Check1.Caption = "un&checked"
End If
End Sub
則按“Alt+c”組合鍵將使控件在選中和未選中之間切換。
注意：這種快捷鍵定義方法對于菜單和許多其它控件同樣適用。