IncludeHiddenText 属性

       

如果该属性值为 True,则从指定区域获取的文本包含隐藏文字。Boolean 类型,可读写。

注意   如果不设置该属性,其默认值为“选项”对话框中“视图”选项卡上“隐藏文字”选项的当前设置(单击“工具”菜单上的“选项”可显示该对话框)。使用 Range 对象的 Text 属性可从指定区域获取文本。

expression.IncludeHiddenText

expression   必需。该表达式返回一个 TextRetrievalMode 对象。

示例

本示例在消息框中显示活动文档中首句的文本。本示例使用 IncludeHiddenText 属性包含隐藏文字。

Dim rngTemp As Range

Set rngTemp = ActiveDocument.Sentences(1)

rngTemp.TextRetrievalMode.IncludeHiddenText = True
MsgBox rngTemp.Text

如果将全部所选内容的格式设为隐藏文字,则本示例发布一条消息。

Dim rngTemp As Range

If Selection.Type = wdSelectionNormal Then
    Set rngTemp = Selection.Range

    rngTemp.TextRetrievalMode.IncludeHiddenText = False
    If rngTemp.Text = "" Then MsgBox "Selection is hidden"
End If