如何使用applyfilter对窗体内的记录进行筛选？

ChaoszZeus

比如说，窗体内显示若干条记录，这些记录由一个表或几个表的字段内容组成，然后我要对某一个字段的内容取一个特定的值的记录进行筛选，该怎么做？

先谢了

ChaoszZeus

是不是这个问题太菜了，大家都不愿回答

ChaoszZeus

没人理我吗？哭

zhqang

创建一个窗体，窗体的数据源是你需要的查询

在窗体上使用向导做一个组合框，组合框的数据源是你需要查询的字段。

在上面创建的查询中，在需要的的准则行单元格中，把该组合框作为组合。

修改窗体的组合框更新事件（在组合框属性窗口中，选择事件，更新后，在打开的VBA窗口中的实践过程中，输入一条语句me.refresh.即可。

cg1

更改 FILTER 属性即可

全部隐藏

Filter 属性

参阅应用于示例特性

使用 Filter 属性可以在对窗体 （窗体：Access 数据库对象之一，可以在这种对象上放置控件，用于执行操作，或在字段中输入、显示、编辑数据。）、报表 （报表：Access 数据库对象的一种，用于按照您的规格打印设定格式且组织好的信息。报表的示例有销售额汇总、电话列表以及邮件标签。） 查询 （查询：有关表中所存数据的问题，或要对数据执行操作的请求。查询可以将多个表中的数据放在一起，以作为窗体、报表或数据访问页的数据源。）或表 （表：数据库对象之一，用来在记录（行）和字段（列）中存储数据。数据通常是有关特定类别事物的，如雇员或订单。）应用筛选时指定要显示的记录子集。String 型，可读/写。

expression.Filter

expression 必需。返回“应用于”列表中的一个对象的表达式。

说明

在 Microsoft Access 项目 （Microsoft Access 项目：与 Microsoft SQL Server 数据库连接且用于创建客户/服务器应用程序的 Access 文件。项目文件中不包含任何数据或基于数据定义的对象（如表或视图）。） (.adp) 中，如果要为服务器上的数据指定服务器筛选，请使用 ServerFilter 属性。

Filter 属性是一个字符串表达式 （字符串表达式：任一求值为一列连续字符的表达式。表达式的元素可以是：返回字符串或字符串 Variant (VarType 8) 的函数；字符串字面值、常量、变量或 Variant。），它包含了一个不带 WHERE 关键字的 WHERE 子句 （WHERE 子句：SQL 语句中用于指定哪部分记录被检索的语素。）。例如下面的 Visual Basic 代码定义并应用筛选以只显示来自美国的顾客：

Me.Filter = "Country = 'USA'"Me.FilterOn = True		

可以使用表或窗体的属性表、宏或 Visual Basic 设置该属性。

也可以在“窗体”视图 （“窗体”视图：一个显示窗体以便显示或接受数据的窗口。“窗体”视图是添加和修改表中数据的主要方式。在该视图中还可以更改窗体的设计。）或“数据表”视图 （“数据表”视图：以行列格式显示来自表、窗体、查询、视图或存储过程的窗口。在“数据表”视图中，可以编辑字段、添加和删除数据，以及搜索数据。）中设置该属性，方法是指向“记录”菜单上的“筛选”，然后单击子菜单中的一个命令。

注释 设置 Filter 属性对 ADO Filter 属性无任何影响。

用 Filter 属性可保存一个筛选以便在日后应用它。筛选被保存在创建该筛选的对象中。在打开对象的时候将自动加载筛选，但不会自动应用筛选。

当新建对象时，该对象将从创建它的表或查询继承 RecordSource、Filter、OrderBy 和 OrderByOn 属性。

要将一个已保存的筛选应用于窗体、查询或表上，可单击工具栏 （工具栏：工具栏中包含可执行命令的按钮和选项。若要显示工具栏，请单击“工具”菜单中的 “自定义”，然后单击 “工具栏”选项卡。）上的“应用筛选”按钮或选择“记录”菜单上的“应用筛选/排序”命令，或者可在宏或 Visual Basic 中把 FilterOn 属性设置为 True。对于报表，可以通过在报表的属性表中把“开启筛选”属性设置为“是”来应用筛选。

“应用筛选”按钮指明了 Filter 和 FilterOn 属性的状态。除非有筛选要应用，否则该按钮是无效的。如果当前应用了一个现有的筛选，则“应用筛选”按钮是被按下的。

若要在打开窗体时自动应用筛选，请在窗体的 OnOpen 事件属性设置中指定一个使用 ApplyFilter 操作的宏或使用 DoCmd 对象的 ApplyFilter 方法的事件过程。

要删除筛选，可单击处于按下状态的“应用筛选”按钮，或单击“记录”菜单中的“取消筛选/排序”，或者使用 Visual Basic 将 FilterOn 属性设置为 False。

注释 可以将筛选保存为查询，方法是在“按窗体筛选” （按窗体筛选：一种筛选数据的技术，该技术使用一个带有空字段（用户可以在此输入筛选出的记录应包含的值）的某个版本的当前窗体或数据表。）窗口或“高级筛选/排序” （“高级筛选/排序”窗口：可在该窗口中从头开始创建筛选。在筛选设计网格中输入条件表达式，以使开启的窗体或数据表中的记录仅限于符合条件的记录子集。）窗口中单击“文件”菜单中的“另存为查询”命令。

当在窗体“设计”视图 （“设计”视图：显示数据库对象（包括：表、查询、窗体、宏和数据访问页）的设计的窗口。在“设计”视图中，可以新建数据库对象和修改现有数据库对象的设计。）中设置 Filter 属性时，Microsoft Access 不验证 SQL 表达式的有效性。如果 SQL 表达式是无效的，则在应用筛选时会出现错误。

1. <SCRIPT language=JScript src="mk:@msitstore:msohlp11.chm::/html/ofvbanl.js" type=text/javascript>
3. <script>

复制代码