我试图让一些代码在表单加载上运行。
但是,我收到了消息:
Compile error: Sub or Function not defined
它发生在一行:Public Sub Form_Load()
Option Compare Database
Public Sub Form_Load()
Me.txtSearch.BackColor = vbYellow
Task = "SELECT * FROM tblTracks WHERE (ID)is null"
Me.RecordSource = Task
Me.txtSearch.SetFocus
End Sub
我尝试过Private / Public并且没有 - 只有Sub - 但他们都给出了同样的错误。
我尝试过添加Option Explicit并从头开始重新输入代码 - 正如建议的那样 - 现在我有一个编译错误:
有人可以帮忙吗?
谢谢,Mark
答案 0 :(得分:0)
这是因为模块已损坏。
删除整行并从头开始重新输入。没有复制粘贴。