Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Use a propriedade Dirty para determinar se o registro atual foi modificado desde que foi salvo pela última vez. Boolean de leitura/gravação.
Sintaxe
mais simples. Sujo
expressão Uma variável que representa um objeto Form.
Comentários
Por exemplo, talvez você queira perguntar ao usuário se as alterações em um registro foram planejadas e, caso contrário, permitir que o usuário passe 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 a partir 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.