如果该属性值为 True,则从指定区域获取的文本包含域代码。Boolean 类型,可读写。
注意 如果不设置该属性,其默认值为“选项”对话框中“视图”选项卡上的“域代码”选项的设置(单击“工具”菜单上的“选项”可显示该对话框)。使用 Range 对象的 Text 属性可从指定的区域获取文本。
expression.IncludeFieldCodes
expression 必需。该表达式返回一个 TextRetrievalMode 对象。
本示例在消息框中显示活动文档首段的文本。本示例可使用 IncludeFieldCodes 属性除去域代码。
Dim rngTemp As Range
Set rngTemp = ActiveDocument.Paragraphs(1).Range
rngTemp.TextRetrievalMode.IncludeFieldCodes = False
MsgBox rngTemp.Text
本示例从引用选定文本的区域中除去域代码和隐藏文字,并在消息框中显示文本。
Dim rngTemp As Range
If Selection.Type = wdSelectionNormal Then
Set rngTemp = Selection.Range
With rngTemp.TextRetrievalMode
.IncludeHiddenText = False
.IncludeFieldCodes = False
End With
MsgBox rngTemp.Text
End If