如何将焦点设置在打开新表单之前选择的最后一条记录上

时间:2014-07-07 18:40:27

标签: access-vba ms-access-2010

我有一个允许用户浏览表单#1上的记录并通过选择记录的表单,可以通过单击单个记录进一步丰富它,然后打开表单#2以允许用户添加其他详细信息。我的问题发生在表格#2上进行修改后关闭它,焦点自动设置为表格#1中的第一个记录。我想了解如何将重点放在打开表格#2之前查看的最后一条记录上。

1 个答案:

答案 0 :(得分:1)

当您关闭Form2时,您是否正在重新查找Form1?如果是这样,那么你必须在重新查询之前在Form1中存储当前记录的ID值,然后在你的requery之后使用FindFirst找到它:

Dim intID As Integer
intID = Forms("Form1").YourIDField 
' requery, or whatever, here
Dim rst As DAO.Recordset
Set rst = Me.RecordsetClone
rst.FindFirst "YourIDField=" & intID
If Not rst.NoMatch Then
  Me.Bookmark = rst.Bookmark
End If