Access VBA教程:Locked属性

Locked属性指定是否可以在“窗体”视图中编辑控件的数据。Boolean 型,可读写。

expression.Locked

expression   必需。返回“Applies To”列表中的一个对象的表达式。

说明

Locked属性使用下列设置:

设置 Visual Basic 说明
True (未绑定对象框的默认值)控件可正常操作但不允许编辑、添加或删除数据。
False (除未绑定对象框以外的所有控件的默认值)控件可正常操作并允许编辑、添加或删除数据。

可以使用窗体的属性表Visual Basic 设置这些属性。

使用 Locked属性可以将字段中的数据设为只读以保护数据。例如,可能会希望控件仅显示信息而不允许编辑,或者想要锁定控件直到满足某个特定条件。

VBA示例

下面的示例,根据当前记录中显示的雇员类型切换一个命令按钮的 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 If
End Sub

上页:Access VBA教程:LocationOfComponents属性 下页:Access VBA教程:LogMessages属性

Access VBA教程:Locked属性

Access VBA教程:LogMessages属性 Access VBA教程:LpOleObject属性
Access VBA教程:MailEnvelope属性 Access VBA教程:Major属性
Access VBA教程:MaxRecButton属性 Access VBA教程:MaxRecords属性
Access VBA教程:MDE属性 Access VBA教程:Me属性
Access VBA教程:MenuBar属性 Access VBA教程:MinMaxButtons属性
Access VBA教程:Minor属性 Access VBA教程:Modal属性
Access VBA教程:Module属性 Access VBA教程:Modules属性
Access VBA教程:MousePointer属性 Access VBA教程:MouseWheel属性
Access VBA教程:Moveable属性 Access VBA教程:MoveLayout属性
Access VBA教程:MSODSC属性 Access VBA教程:MultiRow属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号