任务五
本次任务的目的是给菜单加入日期筛选功能：
单击筛选按钮，即可筛选出开始日期和结束日期之间的数据。
设计步骤
在菜单中，增加一个功能组，名称为"任务五"，在功能组中增加一个工具栏，名称为"工具栏一"，然后在工具栏增加两个日期输入框(DatePicker)，一个标准按钮：
| 类型 |
名称 |
标题 |
图标 |
| 日期输入框 |
StartDate |
开始日期： |
|
| 日期输入框 |
EndDate |
结束日期： |
|
| 标准按钮 |
Filter |
|
Filter.Ico |
将Filter按钮的Click事件设为：
Dim
StartDate
As
Date
Dim EndDate
As
Date
With RibbonTabs("实战演练")("任务五")
StartDate = .Items("StartDate").Value
EndDate = .Items("EndDate").Value
End
With
Tables("订单").Filter
= "[日期] >= #" &
StartDate & "# And [日期] <= #"
& EndDate & "#"
本页地址：http://www.foxtable.com/webhelp/topics/1137.htm