ms-access - 打开表格时出错

Question

我对最简单的代码感到疯狂，但它却无法工作。我不明白为什么。我的表单上有一个按钮可以打开另一个表单，但是当我单击它时，我收到以下错误，并且真的不知道要更改什么:

我的代码点击代码是:

Private Sub HSbrowse_Click()

DoCmd.OpenForm "frmSearchPCR"

End Sub

有什么想法吗？

Answer 1

这个问题我已经遇到过好几次了。我相信这是由您的表单模块损坏引起的。要修复此问题，请将表单的“有模块”属性设置为“否”，然后保存并关闭表单。这将删除该模块及其包含的任何代码，因此您需要先复制代码。打开 VBA 窗口以验证该模块是否已删除，然后重新打开表单并将其“Has Module”属性设置回“Yes”并将代码粘贴回去。此方法已多次为我解决了此问题。