在Access中,我有一个带有列表框的主窗体。列表框用于导航到主窗体上的不同记录。主窗体还有一个按钮,其中包含以下代码,用于打开一个对话框窗体,我在该窗体上添加了一条新记录。
Private Sub New_Btn_Click()
DoCmd.OpenForm "New Issue", , , , acFormAdd, acDialog
Requery
Me.ID_Box.SetFocus
End Sub关闭对话框窗体后,我希望列表框更新并选择在"New Issue“窗体上添加的新记录,并且希望主窗体导航到新记录。
我不知道如何让这两个动作发生。请帮我找到这些步骤的最佳方法。
发布于 2015-08-13 06:31:47
假设列表框有一个行源,您可以重新查询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.PrimaryKeyFieldhttps://stackoverflow.com/questions/31975092
复制相似问题