Word控件Spire.Doc 教程：用C＃，VB.NET在Word中创建对书签的交叉引用

叁歲伎倆 2022-01-14 01:59 395阅读 0赞

[2019独角兽企业重金招聘Python工程师标准>>> ][2019_Python_] ![hot3.png][]

交叉引用是指同一文档中其他地方的相关信息,我们可以创建对任何现有项目（如标题，脚注，书签，标题和编号段落）的交叉引用,本文将展示如何使用C＃和VB.NET的Spire.Doc创建书签的交叉引用。

Step 1: 创建一个文档实例。

Document doc = new Document();
    Section section = doc.AddSection();

Step 2: 插入一个书签。

Paragraph paragraph = section.AddParagraph();
    paragraph.AppendBookmarkStart("MyBookmark");
    paragraph.AppendText("Text inside a bookmark");
    paragraph.AppendBookmarkEnd("MyBookmark");

Step 3: 创建交叉引用字段，并通过书签名称将其链接到书签。

Field field = new Field(doc);
    field.Type = FieldType.FieldRef;
    field.Code = @"REF MyBookmark \p \h";

Step 4: 添加一个段落，并将该字段插入段落。

paragraph = section.AddParagraph();
    paragraph.AppendText("For more information, see ");
    paragraph.ChildObjects.Add(field);

Step 5: 将FieldSeparator对象插入到段落中，该段落在字段中用作分隔符。

FieldMark fieldSeparator= new FieldMark(doc, FieldMarkType.FieldSeparator);
    paragraph.ChildObjects.Add(fieldSeparator);

Step 6: 设置交叉引用字段的显示文本。

TextRange tr = new TextRange(doc);
    tr.Text = "above";
    paragraph.ChildObjects.Add(tr);

Step 7: 将FieldEnd对象插入段落，该段落用于标记字段的末尾。

FieldMark fieldEnd = new FieldMark(doc, FieldMarkType.FieldEnd);
    paragraph.ChildObjects.Add(fieldEnd);

Step 8: 保存到文件。

doc.SaveToFile("output.docx", FileFormat.Docx2013);

导出：交叉引用显示为将读者引用到引用项目的链接。

![图片1][1]

完整代码：

\[C\#\]

Document doc = new Document();
    Section section = doc.AddSection();
    //create a bookmark
    Paragraph paragraph = section.AddParagraph();
    paragraph.AppendBookmarkStart("MyBookmark");
    paragraph.AppendText("Text inside a bookmark");
    paragraph.AppendBookmarkEnd("MyBookmark");
    //insert line breaks
    for (int i = 0; i < 4; i++)
    {
        paragraph.AppendBreak(BreakType.LineBreak);
    }        
    //create a cross-reference field, and link it to bookmark                    
    Field field = new Field(doc);
    field.Type = FieldType.FieldRef;
    field.Code = @"REF MyBookmark \p \h";
    //insert field to paragraph
    paragraph = section.AddParagraph();
    paragraph.AppendText("For more information, see ");
    paragraph.ChildObjects.Add(field);
    //insert FieldSeparator object
    FieldMark fieldSeparator = new FieldMark(doc, FieldMarkType.FieldSeparator);
    paragraph.ChildObjects.Add(fieldSeparator);
    //set display text of the field
    TextRange tr = new TextRange(doc);
    tr.Text = "above";
    paragraph.ChildObjects.Add(tr);
    //insert FieldEnd object to mark the end of the field
    FieldMark fieldEnd = new FieldMark(doc, FieldMarkType.FieldEnd);
    paragraph.ChildObjects.Add(fieldEnd);
    //save file
    doc.SaveToFile("output.docx", FileFormat.Docx2013);

\[VB.NET\]

Document doc = New Document()
    Dim section As Section = doc.AddSection()
    'create a bookmark
    Dim paragraph As Paragraph = section.AddParagraph()
    paragraph.AppendBookmarkStart("MyBookmark")
    paragraph.AppendText("Text inside a bookmark")
    paragraph.AppendBookmarkEnd("MyBookmark")
    'insert line breaks
    Dim i As Integer
    For i = 0 To  4- 1  Step i + 1
        paragraph.AppendBreak(BreakType.LineBreak)
    Next
    'create a cross-reference field, and link it to bookmark                    
    Dim field As Field = New Field(doc)
    field.Type = FieldType.FieldRef
    field.Code = "REF MyBookmark \p \h"
    'insert field to paragraph
    paragraph = section.AddParagraph()
    paragraph.AppendText("For more information, see ")
    paragraph.ChildObjects.Add(field)
    'insert FieldSeparator object
    Dim fieldSeparator As FieldMark = New FieldMark(doc, FieldMarkType.FieldSeparator)
    paragraph.ChildObjects.Add(fieldSeparator)
    'set display text of the field
    Dim tr As TextRange = New TextRange(doc)
    tr.Text = "above"
    paragraph.ChildObjects.Add(tr)
    'insert FieldEnd object to mark the end of the field
    Dim fieldEnd As FieldMark = New FieldMark(doc, FieldMarkType.FieldEnd)
    paragraph.ChildObjects.Add(fieldEnd)
    'save file
    doc.SaveToFile("output.docx", FileFormat.Docx2013)

转载于:https://my.oschina.net/u/3006003/blog/1595068

[2019_Python_]: https://my.oschina.net/u/2663968/blog/3061697
[hot3.png]: /images/20220113/a5ce080f1ecf4249b23ba01b50aca3f2.png
[1]: /images/20220113/8c6cabf0ee1a4a9ba54d621bf5f2ba53.png