打开表单时出错

Question

我对最容易使用的最简单的代码感到疯狂。我无法理解为什么。我在表单上有一个按钮，打开另一个表单，但是当我点击它时，我得到以下错误，并且不知道要改变什么：

我的代码点击代码是：

Private Sub HSbrowse_Click()

DoCmd.OpenForm "frmSearchPCR"

End Sub

任何想法？

Answer 1

我已多次遇到过这个问题。我相信它是由你的表单模块腐败造成的。要解决此问题，请将表单的“包含模块”属性设置为“否”，然后保存并关闭表单。这将删除模块及其包含的任何代码，因此您需要先复制代码。打开VBA窗口以验证模块是否已删除，然后重新打开表单并将其“Has Module”属性设置回“Yes”并重新粘贴代码。此方法不止一次为我解决了这个问题。

Answer 2

当前表单中是否包含任何ActiveX控件？

如果没有，那么您的表单可能已损坏， 使用例如重建数据库TM-REBUILDDATABASE

Answer 3

首先逐个删除单个控件。当你的错误消失时，你会知道有问题的控制，如果这确实是问题。

表单是否有底层数据？您是否删除了该问题以查看问题是否发生了变化？