我在 Access 2010 中有一个联系人数据库。我制作了一个显示所有联系人信息的表单，但我需要一种在联系人之间轻松导航的方法。我制作了一个搜索框，并且我有一个查询，该查询使用与搜索匹配的名称的列表更新一个连续的子表单。现在我需要一种方法，以便能够单击子表单中的名称以转到主表单中的该记录。
使用拆分表单我会得到我需要的东西，但是当我有标签或导航表单时它不起作用。此外，对于我的目的，连续子表单看起来和工作得更好。
Access 2010 中的联系人模板几乎就是我要找的，搜索框和结果列表在左侧，但我无法使用或复制该模板。
【问题讨论】：
标签： ms-access vba ms-access-2010
如果您使用连续子表单，只需在子表单详细信息部分使用点击事件即可。
1.在详细信息部分内单击，然后转到属性侧栏的事件选项卡。
2.进入“On Click”，选择代码生成器进入vba自动获取你的进程的基本环境
3.粘贴以下代码并根据需要进行修改。
DoCmd.GoToRecord acDataForm, "yourmainform", acGoTo, sub_fieldname
假设您有以下设置： frm_contact 是您的主要表单。
sub_contactlist 是您的子表单，显示所有列出的姓名
contact_id 是您的表单（主表单和子表单）的唯一标识符
sub_contactlist 的详细信息部分的最终结果应该是这样的。
Private Sub Detail_Click()
DoCmd.GoToRecord acDataForm, "frm_contact", acGoTo, contact_id
End Sub
“contact_id”指的是子表单中的当前联系人条目。它也可能有不同的命名。为了清楚起见，您还可以使用“Me.contact_id”。代码将跳转到唯一标识符与偏移量匹配的条目（在本例中为：contact_id）。
如果您不使用详细信息部分子表单，而是使用主表单上的按钮或类似内容，您甚至可以将“acDataForm”和“frm_contact”留空。
注意：我通常建议在处理代码时尽可能省略空格。如果您的名字中有空格，请将它们放在方括号中。否则你会得到一个错误。有些人通常使用方括号来以某种方式突出显示代码中的字段。我没有。
【讨论】：