访问表单转到记录

Question

在Access中，我有一个带有列表框的主窗体。列表框用于导航到主窗体上的不同记录。主窗体还有一个带有以下代码的按钮，用于打开一个对话框，我在其上添加一条新记录。

Private Sub New_Btn_Click()
    DoCmd.OpenForm "New Issue", , , , acFormAdd, acDialog
    Requery

    Me.ID_Box.SetFocus
End Sub

关闭对话框表单后，我希望列表框更新并选择在“新问题”表单上添加的新记录，并且我希望主表单导航到新记录。

我无法弄清楚如何使这些动作发生。请帮我找到完成这些步骤的最佳方法。

Answer 1

假设列表框有一个rowsource，你可以重新查询ListBox以显示如下的新记录： ListBox1.Requery

然后将'main'表单移动到最新记录（假设ID / PK是一个自动编号字段，这是表单记录源的排序方式）： DoCmd.GoToRecord , "MainFormNameHere",acLast

如果您没有订购的记录集，可以使用

  Me.Recordset.FindFirst "PrimaryKeyField = " & NewRecordPK

其中NewRecordPK是存储新记录主键的变量。

如果您愿意，可以从对话框中调用此方法。只需确保首先使用Docmd.Save然后

之类的内容保存记录

Forms!frmMainForm.Form.Recordset.FindFirst "PrimaryKeyField = " & Me.PrimaryKeyField