IncludeFieldCodes 属性

       

如果该属性值为 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