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

Важно :  Данная статья переведена с помощью машинного перевода, см. Отказ от ответственности. Используйте английский вариант этой статьи, который находится здесь, в качестве справочного материала.

Применение

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

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

выражение.AllowEdits

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

Настройка

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

Параметр

Visual Basic

Описание

Да

True

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

Нет

False

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


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

Замечания

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

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

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

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

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

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

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

  • Ввод данных (DataEntry) — «Нет»

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

Пример

В следующем примере рассматривается свойство ControlType для всех элементов управления в форме. Для каждого подпись и текстовое поле элемента управления процедура переключает свойство SpecialEffect для этих элементов управления. После меток SpecialEffect свойству теньюSpecialEffect текстовых полей задано значение Обычный и Разрешитьдобавлений, 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

Примечание : Отказ от ответственности относительно машинного перевода. Данная статья была переведена с помощью компьютерной системы без участия человека. Microsoft предлагает эти машинные переводы, чтобы помочь пользователям, которые не знают английского языка, ознакомиться с материалами о продуктах, услугах и технологиях Microsoft. Поскольку статья была переведена с использованием машинного перевода, она может содержать лексические,синтаксические и грамматические ошибки.

Совершенствование навыков
Перейти к обучению
Первоочередный доступ к новым возможностям
Присоединиться к программе предварительной оценки Office

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

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

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

×