Ms access 从选项卡打开新表单

我正在使用VBA/Access创建表单以访问我的数据库

在一个表单中，我有一个*lst_sinistres*列表框，它显示我的SQL查询的结果，当我双击其中一个结果时，它会打开另一个表单，感谢这段代码

Private Sub lst_sinistres_DblClick(Cancel As Integer)

    DoCmd.OpenForm "F_SINISTRE_MRH", acNormal, , , , , Me.lst_sinistres.Value

End Sub

我想改变我的形式，并添加标签，使其更符合人体工程学。因此，我将我的*lst_sinistres*列表框放在一个选项卡中。 问题是，当我双击此列表框中的一个结果（现在放置在选项卡中）时，*F\u SINISTRE\u MRH*表单不会打开

有人对这个有想法吗​​问题可能出在哪里

---

谢谢

VBA控件事件的一个怪癖是，事件代码可以与控件对象分离。导致这种情况的原因往往是重新命名控件以及在控件之间复制/粘贴类似代码。要将列表框移动到选项卡控件上，需要临时剪切并粘贴它。这破坏了编写的代码和对象名称之间的链接。当代码和对象正确链接时，[Event Procedure]将显示在属性表中（如@4dmonster所建议）

如果您在VBA编辑器中，选择Debug->Compile将搜索所有代码，并使用类似的命名控件重新链接事件代码。在重新编写之前，这一步值得一试，因为您可能最终会遇到孤立的代码块

Private Sub OldControlName_DblClick(Cancel As Integer)
MsgBox "Why don't I work anymore?"
End Sub

它们被视为表单级子例程，只是碰巧从未被调用。

---

pT

检查lst_sinistres控件在PalletOK中是否具有DblClick属性。。我只是通过选择DblClick属性重写了代码，它成功了。不知道为什么。谢谢