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

Question

我正在尝试关注Microsoft's example，了解如何在 Microsoft Access 中向 ComboBox 添加“全部”选项，但除了指定代码之外，他们的文章在提供指导方面做得不够。

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

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

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

Answer 1

检查组合框的控制源属性。听起来它可能绑定到表单记录源中的一个字段。如果您将其设为 unbound 控件（在 Control Source 属性中没有任何内容），您应该能够从组合的 Row Source 中选择任何项目，而 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 部分。只是尽量不要将一些真正的大表用作 AnyTable。

编辑：实际上，如果 RealBigTable 有一个主键或其他唯一字段，您可以在 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 来精简它们。