4

我一直在开发一个 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,返回以下错误:

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

我不知道从这里去哪里。

4

1 回答 1

5

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

控件名称

于 2013-02-21T11:26:25.487 回答