Report.Dirty 属性 (Access)

使用 Dirty 属性可确定当前记录自上次保存以来是否已修改。 读/写 Boolean。

语法

表达式。脏

表达 一个代表 Report 对象的变量。

备注

例如，你可能想要询问用户是否打算对记录进行更改，如果不是，则允许用户在不保存更改的情况下移动到下一条记录。

保存记录时，Microsoft Access 将 Dirty 属性设置为 False 。 当用户更改记录时，该属性设置为 True 。

示例

下面的示例在数据更改时启用 btnUndo 按钮。 UndoEdits ( ) 子例程是从文本框控件的 AfterUpdate 事件调用的。 选择启用的 btnUndo 按钮将使用 OldValue 属性还原控件的原始值。

Sub UndoEdits() 
 If Me.Dirty Then 
 Me!btnUndo.Enabled = True ' Enable button. 
 Else 
 Me!btnUndo.Enabled = False ' Disable button. 
 End If 
End Sub 
 
Sub btnUndo_Click() 
 Dim ctlC As Control 
 ' For each control. 
 For Each ctlC in Me.Controls 
 If ctlC.ControlType = acTextBox Then 
 ' Restore Old Value. 
 ctlC.Value = ctlC.OldValue 
 End If 
 Next ctlC 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。