添加“全部”用于在 MS Access 中过滤报告的组合框选项

Question

我正在尝试按照 Microsoft 的示例了解如何将“全部”选项添加到组合框Microsoft Access，但除了指定代码之外，他们的文章没有提供足够的指导。

我想做的是构建一个表单，允许用户从组合框中选择一个选项（选项是从表中的记录生成的），然后构建一个根据用户选择的选项进行过滤的报告。组合框由 2 列组成：记录的主键/ID 及其可显示的名称。

我无法理解 Microsoft 提供的 VBA 代码足以弄清楚发生了什么，但我希望组合框中的“全部”选项要么有一个空白主键/ID，要么有一个 = 0。那不是在这种情况下，使用表单时选择“全部”选项会导致错误消息“您输入的值对此字段无效”。这让我相信“全部”文本被填充到主键/ID 列而不是显示列中。该示例指示我将显示列号分配为 ComboBox 的“Tag”属性 - 在本例中，我的显示列号为 2。但是，这（以及我添加的几乎任何其他值）会导致上述错误信息。

知道微软的例子是否适用于我的情况，或者我是否需要以某种方式调整他们的代码？

Answer 1

检查组合框的“控制源”属性。听起来它可能绑定到表单记录源中的字段。如果您将其设置为未绑定控件（控件源属性中没有任何内容），您应该能够从组合的行源中选择任何项目，而 Access 不会向您抱怨。

假设您的组合的行源是这样的查询：

SELECT id, disp_name
FROM YourTable
ORDER BY disp_name;

您可以使用 UNION 查询添加“所有”行：

SELECT id, disp_name
FROM YourTable
UNION ALL
SELECT TOP 1 0, "**ALL**"
FROM AnyTable
ORDER BY disp_name;

AnyTable 可以就是这样。如果您碰巧有一个只包含一行的表，请使用该行...您甚至不需要 TOP 1 部分。只是尽量不要使用某些ReallyBigTable 作为AnyTable。

编辑：实际上，如果某些ReallyBigTable具有主键或其他唯一字段，您可以在WHERE子句中使用这些字段来检索单个行，那么它就可以了：

SELECT id, disp_name
FROM YourTable
UNION ALL
SELECT 0, "**ALL**"
FROM ReallyBigTable
WHERE pk_field = 1
ORDER BY disp_name;

UNION ALL将返回所有组合行。如果有任何重复的行，您可以仅使用 UNION 而不是 UNION ALL 来减少它们。