Ms Access VBA错误3070

我在表单中有以下代码

Dim rs As Object
    DoCmd.OpenForm "frmCustomer"
        Set rs = Forms!frmCustomer.Recordset.Clone
            rs.FindFirst "[CustomerID]=" & Me.CustomerID  <== Error Line
            Forms!frmCustomer.Bookmark = rs.Bookmark
    DoCmd.Close acForm, "frmDebt", acSaveNo

---

有什么想法吗？

看起来您引用的

ControlSource

属性不正确-除非它是一个变量。如果您在更改的零件周围再添加几行，可能会有所帮助。只需添加一个文本框

txtotal

，其中包含

Control Source Property=DLookUp（“[sumApp]-[sumFin]”；“qtrDebt”；“[CustomerID]=”&[CustomerID]）

。我做了一个小改动

rs.FindFirst”[CustomerID]=”&Me.CustomerID

到此代码

rs.FindFirst“[CustomerID]=”&CustomerID

。它正在工作，但有人能帮我吗？如果它在工作，你为什么需要帮助？试着使用一个！而不是一个。在我之后。感叹号指的是一个字段，其中。引用控件，如果控件和字段的名称相同，则访问可能会混淆。

ControlSource = DLookUp("[sumApp]-[sumFin]";"qtrDebt";
    "[CustomerID] = " & [CustomerID])