91超碰碰碰碰久久久久久综合_超碰av人澡人澡人澡人澡人掠_国产黄大片在线观看画质优化_txt小说免费全本

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

C#/VB.NET怎么實現在Word中插入或刪除腳注

發布時間:2023-03-09 14:06:32 來源:億速云 閱讀:95 作者:iii 欄目:開發技術

本篇內容介紹了“C#/VB.NET怎么實現在Word中插入或刪除腳注”的有關知識,在實際案例的操作過程中,不少人都會遇到這樣的困境,接下來就讓小編帶領大家學習一下如何處理這些情況吧!希望大家仔細閱讀,能夠學有所成!

程序環境

本次測試時,在程序中引入Free Spire.Doc for .NET。可通過以下方法引用 Free Spire.Doc.dll文件:

方法1:將 Free Spire.Doc for .NET下載到本地,解壓,安裝。安裝完成后,找到安裝路徑下BIN文件夾中的 Spire.Doc.dll。然后在Visual Studio中打開“解決方案資源管理器”,鼠標右鍵點擊“引用”,“添加引用”,將本地路徑BIN文件夾下的dll文件添加引用至程序。

方法2:通過NuGet安裝。可通過以下2種方法安裝:

(1)可以在Visual Studio中打開“解決方案資源管理器”,鼠標右鍵點擊“引用”,“管理NuGet包”,然后搜索“Free Spire.Doc”,點擊“安裝”。等待程序安裝完成。

(2)將以下內容復制到PM控制臺安裝。

Install-Package FreeSpire.Doc -Version 10.8.0

在Word中的特定段落后插入腳注

以下是在指定段落后插入腳注的詳細步驟。

  • 創建Document實例

  • 使用Document.LoadFromFile() 方法加載示例Word文檔。

  • 獲取第一節,然后獲取該節中的指定段落。

  • 使用Paragraph.AppendFootnote(FootnoteType.Footnote) 方法在段落末尾添加腳注。

  • 設置腳注的文本內容、字體和顏色,然后設置腳注上標數字的格式。

  • 使用Document.SaveToFile() 方法保存結果文檔。

完整代碼

C#

using Spire.Doc;
using Spire.Doc.Documents;
using Spire.Doc.Fields;
using System.Drawing;

namespace AddFootnote
{
    class Program
    {
        static void Main(string[] args)
        {
            //創建Document實例
            Document document = new Document();

            //加載Word文檔示例
            document.LoadFromFile("我與地壇.docx");

            //獲取第一節
            Section section = document.Sections[0];

            //獲取節中的指定段落
            Paragraph paragraph = section.Paragraphs[1];

            //在段落末尾添加腳注
            Footnote footnote = paragraph.AppendFootnote(FootnoteType.Footnote);

            //設置腳注的文本內容
            TextRange text = footnote.TextBody.AddParagraph().AppendText("即使世界毀滅,那又怎樣,天地崩塌,于我何干,我在乎的只有他。");

            //設置文本字體和顏色
            text.CharacterFormat.FontName = "宋體";
            text.CharacterFormat.FontSize = 12;
            text.CharacterFormat.TextColor = Color.DarkBlue;

            //設置腳注上標數字的格式
            footnote.MarkerCharacterFormat.FontName = "Calibri";
            footnote.MarkerCharacterFormat.FontSize = 15; 
            footnote.MarkerCharacterFormat.Bold = true;
            footnote.MarkerCharacterFormat.TextColor = Color.DarkCyan;

            //保存結果文檔
            document.SaveToFile("添加腳注.docx", FileFormat.Docx);

        }
    }
}

VB.NET

Imports Spire.Doc
Imports Spire.Doc.Documents
Imports Spire.Doc.Fields
Imports System.Drawing

Namespace AddFootnote
    Friend Class Program
        Private Shared Sub Main(ByVal args As String())
            '創建Document實例
            Dim document As Document = New Document()

            '加載Word文檔示例
            document.LoadFromFile("我與地壇.docx")

            '獲取第一節
            Dim section As Section = document.Sections(0)

            '獲取節中的指定段落
            Dim paragraph As Paragraph = section.Paragraphs(1)

            '在段落末尾添加腳注
            Dim footnote As Footnote = paragraph.AppendFootnote(FootnoteType.Footnote)

            '設置腳注的文本內容
            Dim text As TextRange = footnote.TextBody.AddParagraph().AppendText("即使世界毀滅,那又怎樣,天地崩塌,于我何干,我在乎的只有他。")

            '設置文本字體和顏色
            text.CharacterFormat.FontName = "宋體"
            text.CharacterFormat.FontSize = 12
            text.CharacterFormat.TextColor = Color.DarkBlue

            '設置腳注上標數字的格式
            footnote.MarkerCharacterFormat.FontName = "Calibri"
            footnote.MarkerCharacterFormat.FontSize = 15
            footnote.MarkerCharacterFormat.Bold = True
            footnote.MarkerCharacterFormat.TextColor = Color.DarkCyan

            '保存結果文檔
            document.SaveToFile("添加腳注.docx", FileFormat.Docx)

        End Sub
    End Class
End Namespace

效果圖

C#/VB.NET怎么實現在Word中插入或刪除腳注

在Word中的特定文本后插入腳注

我們還可以在文檔中任何位置的指定文本后插入腳注。以下是詳細步驟。

  • 創建Document實例。

  • 使用Document.LoadFromFile() 方法加載Word文檔。

  • 使用Document.FindString() 方法查找指定的文本。

  • 使用TextSelection.GetAsOneRange() 方法獲取指定文本的文本范圍。

  • 使用TextRange.OwnerParagraph 屬性獲取文本范圍所在的段落。

  • 使用Paragraph.ChildObjects.IndexOf() 方法獲取段落中文本范圍的位置索引。

  • 使用Paragraph.AppendFootnote(FootnoteType.Footnote)方法添加腳注,然后使用Paragraph.ChildObjects.Insert() 方法在指定文本后插入腳注

  • 設置腳注的文本內容、字體和顏色,然后設置腳注上標數字的格式。

  • 使用Document.SaveToFile() 方法保存結果文檔。

完整代碼

C#

using Spire.Doc;
using Spire.Doc.Documents;
using Spire.Doc.Fields;
using System.Drawing;

namespace InsertFootnote
{
    class Program
    {
        static void Main(string[] args)
        {
            //創建Document實例
            Document document = new Document();

            //加載Word文檔示例
            document.LoadFromFile("我與地壇.docx");

            //查找指定的文本字符串
            TextSelection selection = document.FindString("最苦的母親", false, true);

            //獲取指定文本的文本范圍
            TextRange textRange = selection.GetAsOneRange();

            //獲取文本范圍所在的段落
            Paragraph paragraph = textRange.OwnerParagraph;

            //獲取段落中文本范圍的位置索引
            int index = paragraph.ChildObjects.IndexOf(textRange);

            //添加腳注
            Footnote footnote = paragraph.AppendFootnote(FootnoteType.Footnote);

            //在指定段落后插入腳注
            paragraph.ChildObjects.Insert(index + 1, footnote);

            //設置腳注的文本內容
            TextRange text = footnote.TextBody.AddParagraph().AppendText("不知道兒子的不幸在母親那兒總是要加倍的。");

            //設置文本字體和顏色
            text.CharacterFormat.FontName = "宋體";
            text.CharacterFormat.FontSize = 12;
            text.CharacterFormat.TextColor = Color.DarkBlue;

            //設置腳注上標數字的格式
            footnote.MarkerCharacterFormat.FontName = "Calibri";
            footnote.MarkerCharacterFormat.FontSize = 15;
            footnote.MarkerCharacterFormat.Bold = true;
            footnote.MarkerCharacterFormat.TextColor = Color.DarkGreen;

            //保存結果文檔
            document.SaveToFile("插入腳注.docx", FileFormat.Docx);
        }
    }
}

VB.NET

Imports Spire.Doc
Imports Spire.Doc.Documents
Imports Spire.Doc.Fields
Imports System.Drawing

Namespace InsertFootnote
    Friend Class Program
        Private Shared Sub Main(ByVal args As String())
            '創建Document實例
            Dim document As Document = New Document()

            '加載Word文檔示例
            document.LoadFromFile("我與地壇.docx")

            '查找指定的文本字符串
            Dim selection As TextSelection = document.FindString("最苦的母親", False, True)

            '獲取指定文本的文本范圍
            Dim textRange As TextRange = selection.GetAsOneRange()

            '獲取文本范圍所在的段落
            Dim paragraph As Paragraph = textRange.OwnerParagraph

            '獲取段落中文本范圍的位置索引
            Dim index As Integer = paragraph.ChildObjects.IndexOf(textRange)

            '添加腳注
            Dim footnote As Footnote = paragraph.AppendFootnote(FootnoteType.Footnote)

            '在指定段落后插入腳注
            paragraph.ChildObjects.Insert(index + 1, footnote)

            '設置腳注的文本內容
            Dim text As TextRange = footnote.TextBody.AddParagraph().AppendText("不知道兒子的不幸在母親那兒總是要加倍的。")

            '設置文本字體和顏色
            text.CharacterFormat.FontName = "宋體"
            text.CharacterFormat.FontSize = 12
            text.CharacterFormat.TextColor = Color.DarkBlue

            '設置腳注上標數字的格式
            footnote.MarkerCharacterFormat.FontName = "Calibri"
            footnote.MarkerCharacterFormat.FontSize = 15
            footnote.MarkerCharacterFormat.Bold = True
            footnote.MarkerCharacterFormat.TextColor = Color.DarkGreen

            '保存結果文檔
            document.SaveToFile("插入腳注.docx", FileFormat.Docx)
        End Sub
    End Class
End Namespace

效果圖

C#/VB.NET怎么實現在Word中插入或刪除腳注

“C#/VB.NET怎么實現在Word中插入或刪除腳注”的內容就介紹到這里了,感謝大家的閱讀。如果想了解更多行業相關的知識可以關注億速云網站,小編將為大家輸出更多高質量的實用文章!

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

德惠市| 海兴县| 沭阳县| 西城区| 娄烦县| 甘泉县| 池州市| 原平市| 西充县| 苏尼特左旗| 定边县| 长兴县| 巫溪县| 扬州市| 巴南区| 恭城| 繁昌县| 普兰县| 乌拉特前旗| 武威市| 伊宁市| 体育| 商都县| 浠水县| 石屏县| 寿阳县| 池州市| 翼城县| 奉贤区| 许昌县| 建宁县| 将乐县| 阜平县| 黔江区| 文成县| 东平县| 阳城县| 勐海县| 万山特区| 武冈市| 额尔古纳市|