Compartilhar via


Propriedade Report.Dirty (Access)

Use a propriedade Dirty para determinar se o registro atual foi modificado desde a última salvação. Boolean de leitura/gravação.

Sintaxe

expressão. Sujo

Expressão Uma variável que representa um objeto Report .

Comentários

Por exemplo, você pode querer perguntar ao usuário se as alterações em um registro foram pretendidas e, se não, permitir que o usuário vá para o próximo registro sem salvar as alterações.

Quando um registro é salva, o Microsoft Access define 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 do evento AfterUpdate dos controles de caixa de texto. Escolher o 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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.