Dirty (propiedad)

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 obligatoria. 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
Ampliar sus conocimientos
Explorar los cursos
Obtener nuevas características primero
Únase a los participantes de Office Insider

¿Le ha sido útil esta información?

¡Gracias por sus comentarios!

Gracias por sus comentarios. Quizá le interese ponerse en contacto con uno de nuestros agentes de soporte de Office.

×