Перейти к основному контенту
Поддержка
Войдите с помощью учетной записи Майкрософт
Войдите или создайте учетную запись.
Здравствуйте,
Выберите другую учетную запись.
У вас несколько учетных записей
Выберите учетную запись, с помощью которой нужно войти.

Применение

Объект Form

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

выражение.AllowEdits

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

Значения

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

Значение

Visual Basic

Описание

Да

True

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

No

False

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


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

Замечания

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

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

Программное изменение значения поля приводит к тому, что текущая запись становится редактируемой независимо от параметра свойства AllowEdits . Если вы хотите запретить пользователю вносить изменения в запись (AllowEditsNo), которую необходимо изменить программным способом, сохраните запись после любых программных изменений; Значение свойства 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

Нужна дополнительная помощь?

Нужны дополнительные параметры?

Изучите преимущества подписки, просмотрите учебные курсы, узнайте, как защитить свое устройство и т. д.

В сообществах можно задавать вопросы и отвечать на них, отправлять отзывы и консультироваться с экспертами разных профилей.

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

Насколько вы удовлетворены качеством перевода?
Что повлияло на вашу оценку?
После нажатия кнопки "Отправить" ваш отзыв будет использован для улучшения продуктов и служб Майкрософт. Эти данные будут доступны для сбора ИТ-администратору. Заявление о конфиденциальности.

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

×