Applies ToAccess для Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Стосується

Об’єкт BoundObjectFrame

Об’єкт OptionButton

Об’єкт CheckBox

Об’єкт OptionGroup

Об’єкт ComboBox

Об’єкт SubForm

Об’єкт CustomControl

Об’єкт TextBox

Об’єкт ListBox

Об’єкт ToggleButton

Об’єкт ObjectFrame

Властивість Locked визначає, чи можна редагувати дані в елементі керування в поданні форми. Логічний вираз (читання й записування).

вираз.Locked

expression — обов’язковий аргумент. Вираз, який повертає один з об'єктів у списку "Застосовується до".

Примітки

Властивість Locked може мати наведені нижче значення.

Значення

Visual Basic

Опис

Так

True (Істина)

Елемент керування працює нормально, але не дозволяє редагувати, додавати та видаляти дані (стандартне значення для незв’язаних рамок об’єкта).

No (Ні)

False (Хибність)

Елемент керування працює нормально та дозволяє редагувати, додавати й видаляти дані (стандартне значення для всіх елементів керування, крім незв’язаних рамок об’єктів).

Ви можете налаштувати ці властивості, використовуючи вікно властивостей форми, макрос або код Visual Basic for Applications (VBA).

За допомогою властивості Locked можна захистити дані в поле, зробивши їх доступними лише для читання. Наприклад, може знадобитися, щоб елемент керування відображав лише відомості, не дозволяючи редагування, або заблокувати елемент керування, доки не буде виконано певну умову.

Приклад

У наведеному нижче прикладі перемикаються властивість Enabled кнопки та властивості Enabled і Locked елемента керування залежно від того, співробітник якого типу відображається в поточному записі. Якщо співробітник є менеджером, кнопка SalaryDetails вмикається, а елемент керування PersonalInfo розблоковується та вмикається.

Sub Form_Current()    If Me!EmployeeType = "Manager" Then        Me!SalaryDetails.Enabled = True        Me!PersonalInfo.Enabled = True        Me!PersonalInfo.Locked = False    Else        Me!SalaryDetails.Enabled = False        Me!PersonalInfo.Enabled = False        Me!PersonalInfo.Locked = True    End IfEnd Sub

Потрібна додаткова довідка?

Потрібні додаткові параметри?

Ознайомтеся з перевагами передплати, перегляньте навчальні курси, дізнайтесь, як захистити свій пристрій тощо.