Свойство AllowEdits (Разрешить изменение)

Применение

Объект Form

С помощью свойства AllowEdits (Разрешить изменение) можно разрешить или запретить пользователю изменять сохраненные записи при работе с формой. Свойство имеет значение типа Boolean, доступное для чтения или записи.

выражение.AllowEdits

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

Значения

Свойство AllowEdits может принимать следующие значения:

Значение

Visual Basic

Описание

Yes

True

(Значение по умолчанию.) Пользователь может изменять сохраненные записи.

No

False

Пользователь не может изменять сохраненные записи.


Свойство AllowEdits можно задать с помощью страницы свойств формы, макроса или кода Visual Basic для приложений (VBA).

Замечания

С помощью свойства AllowEdits можно запретить изменение существующих данных, отображаемых в форме. Если вы хотите запретить изменение данных в отдельном элементе управления, следует использовать свойство Enabled (Доступ) или Locked (Блокировка).

Чтобы запретить изменение существующих записей (сделать форму доступной только для чтения), необходимо задать для свойств AllowAdditions (Разрешить добавление), AllowDeletions (Разрешить удаление) и AllowEdits (Разрешить изменение) значение No. Кроме того, можно сделать записи доступными только для чтения, если задать для свойства RecordsetType (Тип набора записей) значение Snapshot (Статический набор).

Если изменять значение поля программно, текущая запись становится доступной для изменения независимо от значения свойства AllowEdits. Если вы хотите запретить пользователю вносить изменения в запись (свойство AllowEdits имеет значение No), которую необходимо отредактировать программно, нужно сохранить запись после любых программных изменений. В этом случае значение свойства AllowEdits опять вступит в силу после того, как все изменения в текущей записи будут сохранены.

Примечание : Если задан аргумент "Режим данных" макрокоманды "ОткрытьФорму", Microsoft Office Access 2007 заменит значения некоторых свойств формы. Если для аргумента "Режим данных" макрокоманды ОткрытьФорму задано значение Изменить, Access откроет форму со следующими значениями свойств:

  • AllowEdits (Разрешить изменение) — Yes

  • AllowDeletions (Разрешить удаление) — Yes

  • AllowAdditions(Разрешить добавление) — Yes

  • DataEntry (Ввод данных) — No

Чтобы не допустить замены существующих значений свойств макрокомандой ОткрытьФорму, необходимо оставить аргумент "Режим данных" пустым. При этом Access будет использовать значения свойств, заданные в форме.

Пример

В следующем примере рассматривается свойство ControlType для всех элементов управления в форме. Для каждого элемента управления подписи и текстового поля процедура переключает свойство SpecialEffect (Оформление). Если свойство SpecialEffect элемента управления подписи имеет значение Shadowed (С тенью), свойство SpecialEffect элемента управления текстового поля — Normal, а свойства AllowAdditions, AllowDeletions и AllowEdits — значение True, переменная intCanEdit меняет значение, разрешая редактирование данных.

Sub ToggleControl(frm As Form)
Dim ctl As Control
Dim intI As Integer, intCanEdit As Integer
Const conTransparent = 0
Const conWhite = 16777215
For Each ctl in frm.Controls
With ctl
Select Case .ControlType
Case acLabel
If .SpecialEffect = acEffectShadow Then
.SpecialEffect = acEffectNormal
.BorderStyle = conTransparent
intCanEdit = True
Else
.SpecialEffect = acEffectShadow
intCanEdit = False
End If
Case acTextBox
If .SpecialEffect = acEffectNormal Then
.SpecialEffect = acEffectSunken
.BackColor = conWhite
Else
.SpecialEffect = acEffectNormal
.BackColor = frm.Detail.BackColor
End If
End Select
End With
Next ctl
If intCanEdit = IFalse Then
With frm
.AllowAdditions = False
.AllowDeletions = False
.AllowEdits = False
End With
Else
With frm
.AllowAdditions = True
.AllowDeletions = True
.AllowEdits = True
End With
End If
End Sub
Совершенствование навыков
Перейти к обучению
Первоочередный доступ к новым возможностям
Присоединиться к программе предварительной оценки Office

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

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

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

×