Se aplica a
Objeto Form |
Objeto Report |
Puede usar la propiedad Dirty para determinar si se ha modificado el registro actual desde que se guardó por última vez. Por ejemplo, es posible que quiera preguntarle al usuario si los cambios en un registro eran intencionados y, si no es así, permitir que el usuario vaya al registro siguiente sin guardar los cambios. Valor Booleano de lectura y escritura.
expresión.Dirty
expresión Requerido. Una expresión que devuelve uno de los objetos de la lista Se aplica a.
Observaciones
En la propiedad Dirty se usan los valores siguientes.
Valor |
Visual Basic |
Descripción |
True |
True |
Se cambió el registro actual. |
False |
False |
No se cambió el registro actual. |
Esta propiedad está disponible en la vista Formulario y Vista de hoja de datos.
Esta propiedad se establece o se lee con una macro o código de Visual Basic para Aplicaciones (VBA).
Cuando se guarda un registro, Microsoft Office Access 2007 establece la propiedad Dirty en False. Cuando un usuario realiza cambios en un registro, la propiedad se establece en True.
Ejemplo
En el ejemplo siguiente se habilita el botón btnUndo cuando se cambian los datos. La subrutina UndoEdits() se llama desde el evento AfterUpdate de los controles de cuadro de texto. Al hacer clic en el botón btnUndo se restablece el valor original del control mediante la propiedad 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