Question

在我正在构建的Form的一些代码中，有一个我正在处理的Add函数，当我填写所有字段并单击按钮然后它突出显示某个部分并给出了COMPILE ERROR：METHOD OR DAT会员未找到，我无法解决代码问题：

CurrentDb.Execute "INSERT INTO CDData(Gender, EEOC, EmployeeID, EmployeeName, ReadinessLevel, Division, Center, EmployeeFeedback, DevelopmentForEmployee, Justification, Changed) " & _
    " VALUES ('" & Me.cboGender & "','" & Me.cboEEOC & "','" & Me.txtID & "','" & Me.txtName & "','" & Me.cboReady & "','" & Me.txtDivision & "','" & Me.txtCenter & "','" & Me.txtFeedback & "','" & _
    Me.txtDevelopment & "','" & Me.txtJustification & "','" & Me.cboChanged & "') "

错误突出显示的部分是： .txtName

非常感谢任何帮助

Answer 1

与上一个问题一样，我不得不相信txtName不是您表单上的实际控件。仔细检查以确保它存在并且它存在于表单上。如果它不是文本框，您可能需要添加“.Value”。

您可以做的一件事是在代码中添加一系列消息框以进行测试（在推出之前删除它们），这样您就可以确切地知道您正在处理什么。你可以这样做：

MsgBox "Here are the values: Gender - " & Me.cboGender & Chr(13) & Chr(10) & " & _ 
"EEOC - " & Me.cboEEOC  & Chr(13) & Chr(10) & " & _
"EmployeeID - " & Me.txtID & Chr(13) & Chr(10) & " & _ 
"EmployeeName - " & Me.txtName & Chr(13) & Chr(10) & ""

您可以以类似的方式添加其余部分。 “Chr（13）＆amp; Chr（10）”将强制换行，因此它看起来更好一些。无论如何，这将告诉您Access认为所有文本框的值是什么，这可能有助于您确定错误的位置。

在访问表单代码中编译错误

1 个答案: