Свойство «Разрешить добавление (AllowAdditions)»

Применение

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

выражение.AllowAdditions

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

Значения

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

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

Замечания

Если для свойства AllowAdditions задано значение Нет, пользователь может просматривать и редактировать существующие записи, но не добавлять новые.

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

Чтобы форму можно было открыть только для ввода данных, необходимо задать для ее свойства DataEntry (Ввод данных) значение Да.

Если для свойства AllowAdditions задано значение Нет, команда Новая запись в разделе Записи на вкладке Данные недоступна.

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

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

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

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

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

Пример

В следующем примере рассматривается свойство ControlType (Источник данных) для всех элементов управления в форме. Для каждого элемента управления подписи и текстового поля процедура переключает свойство SpecialEffect (Оформление). Если свойство SpecialEffect элемента управления подписи имеет значение Shadowed (С тенью), свойство SpecialEffect элемента управления текстового поля — Normal, а свойства Allow Additions, 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