在MS Access中通过子记录循环

Question

我有一个嵌套的数据表，其中bar是foo的子码。

要遍历FOO的所有记录，我只想做

Dim rst As DAO.Recordset 
Set rst = Forms!foo.Form.RecordsetClone 

Do Until rst.EOF 
    'Do Something 
    rst.MoveNext 
Loop 

但现在我想通过它的子窗体酒吧的所有记录循环。我试过

Dim rst As DAO.Recordset 
Dim subrst As DAO.Recordset 
Set rst = Forms!foo.Form.RecordsetClone 

Do Until rst.EOF 
    Set subrst = Forms!foo.Form!bar.Form.RecordsetClone 

    Do Until subrst.EOF 
     'Do Something 
     subrst.MoveNext 
    Loop 
rst.MoveNext 
Loop 

不幸的是，这只能通过第一个记录的子记录循环。所有其他子记录永远不会到达。我如何访问所有其他子记录的记录集？

Answer 1

您拥有的关系是属于父记录的当前（可见）记录的子记录。

要检索剩余的子记录，请移动主窗体上的记录（使用Bookmark）或打开子窗体的记录源，并在当前循环（“foo”）的父记录的键上循环此筛选。