VBA - “编译错误：找不到方法或数据成员”

Question

我一直在开发一个Access表单来作为SQL数据库的前端。我一直在与开发人员合作，他们将以下VBA代码添加到我们的主要表单中：

Private Sub Form_Current()
    If Me.NewRecord = True Then
        Me.Client_Name.Enabled = True
        Me.SSN.Enabled = True
        Me.DOB.Enabled = True
        Me.Prob_Fee.Enabled = True
        Me.Settle_Atty_Amt.Enabled = True
        Me.Settle_Date.Enabled = True
        Me.Final_Date.Enabled = True
    Else
        Me.Client_Name.Locked = True
        Me.SSN.Locked = True
        Me.DOB.Locked = True
        Me.Prob_Fee.Locked = True
        Me.Settle_Atty_Amt.Locked = True
        Me.Settle_Date.Locked = True
        Me.Final_Date.Locked = True
    End If
End Sub

当我尝试向此语句Me.Case_ID.Locked = True添加新变量时，会返回以下错误：

  

编译错误：找不到方法或数据成员

我不确定从哪里开始。

Answer 1

确保您指的是刚刚添加的控件的名称。它可能与包含的字段/列不同。在属性表的“其他”选项卡上，您将找到名称，即您需要的属性。它通常与包含的控件的名称不同。