Отнася се за
|
Обект BoundObjectFrame |
Обект OptionButton |
|
Обект CheckBox |
Обект OptionGroup |
|
Обект ComboBox |
Обект SubForm |
|
Обект CustomControl |
Обект TextBox |
|
Обект ListBox |
Обект ToggleButton |
|
Обект ObjectFrame |
Свойството Locked указва дали можете да редактирате данните в контрола в изглед на формуляр. Boolean за четене/запис.
израз.Locked
израз Задължително. Израз, който връща един от обектите в списъка "Отнася се за".
Забележки
Свойството Locked използва настройките по-долу.
|
Настройка |
Visual Basic |
Описание |
|
Да |
True |
(По подразбиране за рамки на необвързан обект) Контролата функционира нормално, но не позволява редактиране, добавяне или изтриване на данни. |
|
Не |
False |
(По подразбиране за всички контроли с изключение на рамки на необвързан обект) Контролата функционира нормално и позволява редактиране, добавяне или изтриване на данни. |
Можете да зададете тези свойства с помощта на списък със свойства на формуляра , макрос или код на Visual Basic for Applications (VBA).
Използвайте свойството Locked за защита на данните в поле, като ги направите само за четене. Например може да искате дадена контрола само да показва информация, без да позволява редактиране, или можете да заключите дадена контрола, докато не бъде изпълнено определено условие.
Пример
Следващият пример включва свойството Enabled на команден бутон и свойствата Enabled и Locked на контрола в зависимост от типа на служителя, показан в текущия запис. Ако служителят е ръководител, бутонът "ЗаплатаПодробности" е разрешен и контролата "ЛичнаИнформация" е отключена и разрешена.
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 If
End Sub
