主窗体具有一个下拉列表，其中包含公司列表。当选择一家公司时，数据表子窗体将填充一个客户列表。数据表子表单的目的是对客户信息进行更新。总有1200多个客户。某些更改需要在其中更新代码的弹出模式形式。我必须重新查询数据表子窗体以反映更改。
因此问题再次出现，例如，重新查询后，在数据表子窗体中记录了1200个客户端中的800个。
我已经在互联网上研究了好几天。我尝试了从记录集和书签到您命名的所有内容。无论我在互联网上能找到什么。重新查询后，我仍然无法执行gotorecord。似乎没有任何作用。
我确实保存了当前的记录号，但是在发生重新查询后，我无法进行gotorecord。有没有人有办法解决吗？
关闭事件从弹出模式形式中返回：
Private Sub Form_Close()
Dim rcdnum As Integer
Dim rs As dao.Recordset
Dim bkm As Variant
Set dbs = CurrentDb
Set rs = dbs.OpenRecordset("ManufacturerBuilderReview", dbOpenSnapshot)
rcdnum = Forms![Manufacturers]!RecNum
bkm = rs.Bookmark
If Me.ChangeFlg = 1 Then
Forms![Manufacturers]![ManufacturerBuilderReview].Requery
End If
Forms![Manufacturers]![ManufacturerBuilderReview].SetFocus
Forms![Manufacturers]![ManufacturerBuilderReview]!BldrLst_trk_code.SetFocus
rs.FindFirst "BuilderID = '" & rs![BuilderID] & "'"
DoCmd.GoToControl "BldrLst_trk_code"
rs.Close
Set rs = Nothing
dbs.Close
Set dbs = Nothing
End Sub