Compartilhar via


Propriedade Report.Dirty (Access)

Utilize a propriedade Dirty para determinar se o registo atual foi modificado desde a última vez que foi guardado. Boolean de leitura/gravação.

Sintaxe

expressão. Sujo

expressão Uma variável que representa um objeto Relatório .

Comentários

Por exemplo, poderá querer perguntar ao utilizador se as alterações a um registo se destinavam e, caso contrário, permitir que o utilizador passe para o registo seguinte sem guardar 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 seguinte ativa o botão btnUndo quando os dados são alterados. A subrreplicação UndoEdits( ) é chamada a partir do evento AfterUpdate dos controlos da caixa de texto. Escolher o botão btnUndo ativado restaura o valor original do controlo com 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.