Access 2007 基于主窗体中的字段筛选子窗体？

Question

我的任务是使用 Access 2007 创建一个简单的应用程序来维护用户的收藏品集合。我已经创建并实现了一些请求。它们是：

1. 一个列出他所有收藏品的主窗体
2. 该主窗体下面有一个选项卡式控件，每个选项卡都包含一个子窗体，该子窗体实际上根据主窗体的不同标准“过滤”数据。例如，第一个子表单采用主表单中收藏人物的名称，并在子表单中显示使用该名称的所有其他记录。换句话说，如果人物是“Darth Vader”，子表单将列出所有名称为“Darth Vader”的收藏品。

我已经根据用户请求创建了该应用程序，但到目前为止，有一件事困扰着我们俩。子窗体的第一条记录与主窗体相同。我们都觉得这是多余的，而且很烦人。当然，我的 Access 技能充其量也很弱，所以这可能是一个简单的修复，但是有没有办法删除子表单中的重复记录？我尝试在子表单中实现 where 子句，声明主表单中不包含“图形 ID”。问题是，它的行为就像一个参数提示，当我打开子窗体或主窗体时询问主窗体的FigureID。如果我输入人物 ID，它会起作用，但提示显然是不想要的。

仅供参考：

1. 主表单基于一个查询，该查询基本上从“Figures”表和其他相关表中选择所有记录
2. 当我将子表单控件拖放到选项卡控件上时，创建了子表单，在其中链接了必要的主字段和子字段

Answer 1

假设您有一个名为 frmMain 的表单。该表单在其记录源中包含两个字段：FigureID；和图名。该表单还包括一个名为 txtFigureID 的文本框控件，该控件绑定到FigureID 记录源字段。

frmMain 还包含一个基于名为 frmSub 的窗体的子窗体控件。 frmSub 的记录源还包括FigureID 和Figure_name 字段。子窗体控件的链接主/子字段属性是Figure_name。因此，frmSub 将显示Figure_name 与frmMain 当前记录中相应值匹配的所有行。

现在，如果您希望 frmSub 排除 frmMain 中当前记录的特定记录（由唯一的FigureID 值标识），请在 frmSub 的记录源查询中添加一个 WHERE 子句：

WHERE FigureID <> Forms!frmMain!txtFigureID

我只是在这里猜测，但希望描述是足够接近您的实际情况，很有用。如果没有，请向我们展示您用作子表单记录源的 SQL。

编辑：只有在第一次打开frmMain时才会出现参数提示。之后，您可以在 frmMain 中的记录之间导航，而 frmSub 只会显示您想要查看的记录...而不会再次要求您提供参数值。

发生这种情况的原因是因为子表单在其父表单之前加载...因此当子表单加载时父表单上的控件不可用。

我认为解决办法可能是在其记录源中保存没有 WHERE 条件的子表单。然后，当主窗体加载时，它可以重写子窗体的记录源以包含 WHERE 条件。

因此，在 frmMain 的加载事件中：

Private Sub Form_Load()
    Dim strSql As String
    strSql = "SELECT FigureID, Figure_name FROM YourTable" & vbCrLf & _
        "WHERE FigureID <> Forms!frmMain!txtFigureID"
    Debug.Print strSql
    Me.subformControlName.Form.RecordSource = strSql
End Sub

注意 subformControlName。它是一个控件，而不是一个表单。子表单控件可能与其包含的表单具有相同的名称。但它可能是一个不同的名字。