全部显示
应用于 Field、LinkFormat、MailMergeField 和 Subdocument 对象的 Locked 属性。
对于 Subdocument 对象：如果为 True，则主控文档中的子文档处于锁定状态。
对于 LinkFormat 对象：如果为 True，则 Field、InlineShape 或 Shape 对象处于锁定状态，以防止自动更新。如果将本属性应用于 Shape 对象，而该对象又是一张浮动链接的图片（用 Shapes 对象的 AddPicture 方法所添加的图片），就会产生错误。
对于 Field 或 MailMergeField 对象：如果为 True，则指定的域处于锁定状态。当一个域处于锁定状态时，就不能更新该域的结果。
Boolean 类型，可读写。
expression.Locked
expression 必需。该表达式返回上述对象之一。
如果为 True，则 Fields 集合中的所有域都处于锁定状态。可以是 True、False 或 wdUndefined（如果集合中只有部分域处于锁定状态）。Long 类型，可读写。
expression.Locked
expression 必需。该表达式返回一个 Fields 对象。
本示例检查指定主控文档的第一篇子文档，如果子文档处于锁定状态，则只允许在主控文档中添加备注。
If ActiveDocument.Subdocuments(1).Locked = True Then
ActiveDocument.Protect Type:=wdAllowOnlyComments
End If本示例在所选内容的开始插入一个 DATE 域，然后锁定该域。
Selection.Collapse Direction:=wdCollapseStart
Set myField = ActiveDocument.Fields.Add(Range:=Selection.Range, _
Type:=wdFieldDate)
myField.Locked = True本示例锁定所选内容中的所有域。
Selection.Fields.Locked = True如果活动文档中的部分域处于锁定状态，则本示例将显示一条消息。
Set theFields = ActiveDocument.Fields
If theFields.Locked = wdUndefined Then
MsgBox "Some fields are locked"
ElseIf theFields.Locked = False Then
MsgBox "No fields are locked"
ElseIf theFields.Locked = True Then
MsgBox "All fields are locked"
End If