如何在 MS Access 中使按钮永远变灰

Question

我想要完成的是：为结束时间制作一个按钮，单击后该按钮会变灰。移动到新记录或下一条记录时，该按钮不会显示为灰色，但单击后会显示为灰色。但是，当我移动到新记录时，以前在以前的记录中单击的按钮再次出现。下面是我的按钮点击功能的代码：

Private Sub Command28_Click()
txtEndTime = Time()
Command28.Enabled = False
End Sub

我还为 Form_Current 函数编写了这段代码：

Private Sub Form_Current()
    If Me.NewRecord Then
        Me.Command28.Enabled = True
    End If
End Sub

如有任何帮助，我们将不胜感激。

Answer 1

试试：

Private Sub Form_Current()
    Me!Command28.Enabled = Me.NewRecord
End Sub

并将其重命名为有意义的名称。

How to make a button greyed out FOREVER in MS Access