禁用(其实是用户无法手动改变其选定或未选定状态):
Option1.Enabled = False。
选中:
Option1.Value = True。
不可见(也就是隐藏):
Option1.Visible = False。
value——返回或设置复选框的状态。其值为0时(默认值,对应常数为vbUnchecked),表示复选框没有选中;为1时(对应常数为vbchecked),表示复选框处于选中状态;为2时,表示复选框前面的v处于灰色模糊状态(对应常数为vbGrayed)。Enabled——表示复选框当前是否可用。其值为True时,表示复选框为正常可用状态;为False时,表示复选框处于不可用状态,此时运行时选择项内容变为雕刻状。Check Box控件与Option Button控件有些相似,但在使用时有一个很大的不同,即CheckBox控件是彼此独立工作的,它们互不相干,没有丝毫的制约关系。只要您愿意,全选上或者一个也不选都可以。CheckBox复选框控件有时也以组的形式出现,但即使是这样,它们仍然是毫不相干的,给它们分组只是为了使界面上的复选框显得含义清楚,比如我们总是把反映同一问题的复选框归为一组。(2)常用事件——Click(不支持双击)事件CheckBox控件的常用事件为Click事件,用户的单击操作即触发该事件。(3)例子:每次单击复选框控件时都将使其Caption属性以指示选中或未选中状态(见教材P122)。Private Sub Check1_Click()If Check1.Value = 1 Then '当check1被选中时。
Check1.Caption = "checked"。
ElseIf Check1.Value = 0 Then。
Check1.Caption = "unchecked"。
End IfEnd Sub响应鼠标和键盘:在键盘上使用[TAB]键并按[空格]键,由此将焦点转移到复选框控件上,也会触发复选框控件的Click事件。也可以在Caption属性的一个字母之前添加连字符“&”,创建一个键盘快捷方式来切换复选框控件的选择。如上例中:Private Sub Check1_Click()If Check1.Value = 1 Then '当check1被选中时。
Check1.Caption = "&checked" '定义快捷键。
ElseIf Check1.Value = 0 Then。
End IfEnd Sub则按“Alt+c”组合键将使控件在选中和未选中之间切换。注意:这种快捷键定义方法对于菜单和许多其它控件同样适用。