怎么能使记录集指针指向刚才打开的记录呢？

移动记录时高亮选中当前记录的方法：
Private Sub Form_Current()
DoCmd.RunCommand acCmdSelectRecord
End Sub

双击数据表视图中任一记录打开修改窗体并返回的方法：
在数据表窗体中创建一个函数：
Function EditRecord()
    DoCmd.OpenForm "frm_药品消耗", , , "药品ID='" & Me.药品ID & "'", , acDialog
    Me.Refresh
End Function
然后将所有绑定控件的“双击”属性设为：=EditRecord()

acDialog用于将代码挂起，这样直到关闭“frm_药品消耗”窗体之后，Me.Refresh以及之后的代码才会继续执行

Me.Refresh这一句用于刷新数据表窗体中的数据，此方法只刷新当前已有数据，因为当前记录的位置不会发生改变