Свойство «Внесены изменения (Dirty)»

Применение

объект «Форма»

объект «Отчет»

Свойство Внесены изменения (Dirty) определяет изменения текущей записи с момента ее последнего сохранения. Например, можно спросить пользователя, были ли изменения записи запланированными, и если нет, разрешить ему перейти к следующей записи без сохранения изменений. Возвращается доступное для чтения и записи значение типа Логический.

выражение.Dirty

выражение Обязательно. Выражение, возвращающее один из объектов из списка «Применение».

Замечания

Для свойства Внесены изменения (Dirty) используются следующие значения.

Значение

Visual Basic

Описание

Истина

True

Текущая запись была изменена.

Ложь

False

Текущая запись не была изменена.

Данное свойство доступно в представление формы и режим таблицы.

Свойство устанавливается или считывается при помощи макрос или кода Visual Basic для приложений (VBA).

Если запись сохранена, Microsoft Office Access 2007 задает для свойства Внесены изменения (Dirty) значение Ложь. При изменении записи значение меняется на Истина.

Пример

В следующем примере кнопка btnUndo становится активной при изменении данных. Подпрограмма UndoEdits( ) вызывается из события После обновления (AfterUpdate) элементов управления «Поле». При нажатии активной кнопки btnUndo происходит восстановление исходного значения элемента управления с помощью свойства Старое значение (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
Совершенствование навыков
Перейти к обучению
Первоочередный доступ к новым возможностям
Присоединиться к программе предварительной оценки Office

Были ли сведения полезными?

Спасибо за ваш отзыв!

Благодарим за отзыв! Возможно, будет полезно связать вас с одним из наших специалистов службы поддержки Office.

×