以子窗体查看保存的查询数据 - 访问VBA

Question

我正在尝试以子格式查看数据。以下是我正在尝试的代码。

Dim qdfretriveVal As DAO.QueryDef
Dim rs As Recordset
Dim strQry As String

Set qdfretriveVal = CurrentDb.QueryDef("export_excel")
Set rs = qdfretriveVal(14)

rs.OpenRecordset
DoCmd.OpenQuery "export_excel", acViewNormal, acReadOnly

在Access中，我按照以下内容保存了“export_excel”查询。

PARAMETERS val Long;
SELECT Raw_Data_New.A, Raw_Data_New.B, Raw_Data_New.Val
FROM Raw_Data_New
WHERE (((Raw_Data_New.Val)=[val]));

我想传递参数val并查看Subform中的数据。任何人都可以帮助我，如何实现这个输出？

Answer 1

可能最好的方法是

• 使用要显示为“记录来源”的查询创建表单。不要在这里放置任何过滤器。没有参数。没有。让它显示所有数据。
• 将新表单作为子表单放在主表单上。
• 添加一个类似于组合框或绑定控件的控件（但是您想要获取数据）并将其链接到val（您的参数是什么）
• 在子表单的属性中转到Data＆gt;链接主字段＆gt;你的文本框/组合框/以前的子弹中的任何内容。
• 然后数据＆gt;链接子字段＆gt; Val

现在，您的子表单将根据您的父表单进行过滤，但不包含任何参数。