1.用于在绑定了数据源的窗体(或子窗体)中进行数据筛选,完全可以作为通用查询功能来使用。
2,在需要进行数据筛选查询的窗体中创建一个按钮,然后通过该按钮来打开ActiveFormFilter窗体,示例代码如下:
Private Sub 筛选按钮_Click()
'Me.子窗体.SetFocus '如果要对子窗体的数据进行筛选才用这一句
DoCmd.OpenForm "ActiveFormFilter"
End Sub
3.子窗体优先于窗体,但如果子窗体未绑定记录集,则即使将焦点移到子窗体再打开筛选器,也会是对窗体数据进行筛选。
4.能够自动识别各种数据类型,动态显示各个字段的所有值(排除重复值和空值,可选功能),只需用鼠标点击即可完成筛选查询,而且可以对条件代码进行手动编辑,进行更加复杂的筛选查询。
5.可以对筛选方案进行保存、添加、删除操作,只需在已保存的方案列表中双击方案名称,或者选中方案名称后点击【筛选】按钮即可应用已保存的筛选方案。
6.关于筛选方案的编辑,筛选方案列表处于选中状态时,点【保存】按钮会保存并覆盖到已有方案记录中,否则保存为新记录。筛选方案必须点击【保存】按钮才能保存,临时筛选只需添加条件后点击【应用筛选】按钮即可。要清除当前已输入的条件,只需点击方案列表下边的【新建】按钮。
7.多条件时需要点【添加】按钮将条件加入到条件框中,如果只有一个条件,则可以直接点【应用筛选】按钮进行筛选。
8.筛选方案数据保存在表USysFilterSchemes中,这个表在打开筛选器时如果不存在会自动创建,所以大家在使用时只需要把窗体AcitveFormFilter导入你自己开发的系统中即可。
本人技术水平有限,遗漏之处难免,有什么bug或改进建议欢迎大家向我提出……
附 件:
点击下载此附件