允许条件编辑同时隐藏其他命令按钮 Access 2007-2010

Question

我目前有一个被锁定以防止意外编辑的表单。 但是，该表单包含可能需要编辑的客户联系信息等信息。 我目前有一个命令按钮，用户可以单击该按钮关闭表单并在“编辑”模式下重新打开它。 我想要发生的是当表单重新加载并出现“保存”按钮时，页面上的所有其他命令按钮都会消失。 单击保存按钮后，我希望表单返回到不可编辑状态，并且所有命令按钮都重新出现。

我目前在数据库中的另一个表单上设置了类似的内容（请参阅下面的代码），但这是用于添加新记录的。 如何为现有记录设置它？ 除了关闭和重新打开表单之外，还有更优雅的方法吗？ 我已经搜索了很长一段时间，但似乎无法为此找到任何东西。 如果您需要有关数据库结构的更多背景信息或更详细的信息，请告诉我我正在尝试做什么。 感谢您的帮助！

*

Private Sub add_Click()
On Error Resume Next
DoCmd.GoToRecord , , acNewRec
End Sub
Private Sub Form_Current()
   If Me.NewRecord Then
    Me.recordcounter.Caption = "New Record"
    Me.next.Visible = False
    Me.previous.Visible = False
    Me.first.Visible = False
    Me.last.Visible = False
    Me.add.Visible = False
    Me.save.Visible = True
   Else
    Me.recordcounter.Caption = "Record " & Me.CurrentRecord & " of " & Me.Recordset.RecordCount
    Me.next.Visible = True
    Me.previous.Visible = True
    Me.first.Visible = True
    Me.last.Visible = True
    Me.add.Visible = True
    Me.save.Visible = False
    End If
 End Sub
Private Sub save_Click()
DoCmd.save
    Me.previous.Visible = True
    Me.first.Visible = True
    Me.recordcounter.Caption = "Record " & Me.CurrentRecord & " of " & Me.Recordset.RecordCount + 1
    Me.previous.SetFocus
    Me.save.Visible = False
End Sub

*

Answer 1

无需在“编辑”模式下关闭和重新打开表单，您只需设置您希望能够更改的字段的属性，即 .locked = false 和/或 .enabled = true 直接在“的 OnClick 事件中”编辑”按钮。

在“保存”按钮的 OnClick 事件中，您可以反过来进行。

例如：

Private Sub EditButton_Click()
    Field1.Enabled = True
End Sub

Private Sub SaveButton_Click()
    Field1.Enabled = False
End Sub

现在，当您单击编辑按钮时，您的 field1 将启用输入，在单击您的保存按钮后，您的 field1 将再次被禁用（即变灰并且不允许任何输入或焦点设置）。

如果您更喜欢“锁定”字段（即让它们获得焦点并且不将它们变灰但阻止任何输入），只需使用 .Locked 字段属性。