Aplicável a
Objeto Form |
Objeto Report |
Você pode usar a propriedade Dirty para determinar se o registro atual foi modificado desde que foi salvo pela última vez. Por exemplo, você pode perguntar ao usuário se as alterações feitas em um registro foram intencionais e, em caso negativo, permitir que o usuário prossiga para o próximo registro sem salvar as alterações. Booliano de leitura/gravação.
expressão.Dirty
expressão Obrigatória. Uma expressão que retorna um dos objetos na lista Aplica-se a.
Comentários
A propriedade Dirty usa as configurações a seguir.
Configuração |
Visual Basic |
Descrição |
True |
True |
O registro atual foi alterado. |
False |
False |
O registro atual não foi alterado. |
Esta propriedade está disponível em modo Formulário e modo Folha de Dados.
É possível definir ou ler essa propriedade usando macro ou código do Visual Basic for Applications (VBA).
Quando um registro é salvo, Microsoft Office Access 2007 configura a propriedade Dirty como False. Quando um usuário faz alterações em um registro, a propriedade é definida como True.
Exemplo
O exemplo a seguir habilita o botão btnUndo quando os dados são alterados. A sub-rotina UndoEdits( ) é chamada a partir do evento AfterUpdate de controles de caixa de texto. Clicar no botão btnUndo habilitado restaura o valor original do controle usando a propriedade 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