MS Access：为子子窗体的每个实例执行代码

Question

我有一个MS Access 2013表单，在数据表视图中都包含一个子表单（一个孙子表单）中的一个子表单。

现在，我在主窗体上有了一些控件，通过它们可以过滤子窗体和孙窗体中的记录。

过滤子表单与

Dim strSQL As String
strSQL = ...
Me!child.Form.RecordSource = strSQL
Me!child.Requery

但是如果我想为孙子建立过滤器

Dim strSQL As String
strSQL = ...
Me!child.Form!grandchild.Form.RecordSource = strSQL
Me!child.Form!grandchild.Requery

我收到错误2455。有了这个问题，我通过扩展子窗体的一个或多个行解决了该错误。

但是我现在想为每个孙子行设置RecordSource，而我当前的代码仅适用于第一行 ，而与我正在扩展/折叠的行无关。

如何在我的主窗体中为每个子窗体记录更改RecordSource，充其量最好不要在过滤之前手动扩展任何行？

编辑：古斯塔夫提供了一种无代码的解决方案，对我有帮助。 但是，我想知道如何针对所有实例从主表单中更改孙子的表单属性。

Answer 1

您无需调整记录源。

调整孙子表单控件的“ 主/子”链接字段 ，将自动进行过滤。