IncludeSequenceName 属性

       

该属性返回或设置引文目录的序列 (SEQ) 域标识符。该属性对应于引文目录 (TOA) 域的 \s 开关。String 类型,可读写。

expression.IncludeSequenceName

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

示例

本示例在活动文档的起始处插入引文目录,然后设置目录的格式,使其在页码前显示章节序列域的编号(例如,“Chapter 2-14”)。

Dim rngTemp As Range
Dim toaTemp As TableOfAuthorities

Set rngTemp = ActiveDocument.Range(Start:=0, End:=0)
Set toaTemp = _
    ActiveDocument.TablesOfAuthorities.Add(Range:=rngTemp)

toaTemp.IncludeSequenceName = "Chapter"

本示例返回第一个引文目录的序列名称。

Dim strSequence As String

strSequence = _
    ActiveDocument.TablesOfAuthorities(1).IncludeSequenceName