任务八
尝试使用状态按钮和检查框。
实战演练功能区已经满了,我们增加一个新的功能区"实战演练二"。
首先在实战演练二功能区增加一个状态按钮,用以切换查阅模式,同时增加一个检查框,实现同样的功能。
用两个组件实现同样的功能,没有实际意义,只是为了便于大家学习。
两个菜单组件的属性设置如下:
类型 | 名称 | 标题 |
检查框 | chkBrowse | 查阅模式 |
状态按钮 | staBrowse | 查阅模式 |
然后将两个组件的Click事件代码均设为:
DataTables.AllowEdit = Not DataTables.AllowEdit
最后在系统事件SystemIdle中增加如下代码:
RibbonTabs("实战演练二")("任务八")("chkBrowse").Checked
= Not
DataTables.AllowEdit
RibbonTabs("实战演练二")("任务八")("staBrowse").Pressed
= Not
DataTables.AllowEdit
为什么在SystemIdle事件中更新两个组件的状态,而不是在Click事件中?
这是因为DataTables的AllowEdit属性还可能通过其他方式修改,例如配制栏中的查阅模式按钮。
而且SystemIdle是在系统空闲的时候执行,不会影响运行效率。
现在单击两个组件中的任何一个,即可切换项目的查阅模式,而且两个组件包括配置栏中的"查阅模式"按钮,都会自动更新状态。
本任务设计结果: