C# 给Word中的字符添加强调符号(着重号)

在Word中添加着重号,即强调符号,可以在选中字符后,鼠标右键点击,选择“字体”,在窗口中可直接选择“着重号”添加到文字,用以对重要文字内容起加强提醒的目的,如下图:

通过C#,我们可以查找到需要添加着重号的字符串,然后通过字符串格式的属性值来添加符号。下面,将对此做详细介绍。


 

【引入dll】

方法1:手动引入。

将 Free Spire.Doc for .NET 下载到本地,解压,安装。安装完成后,找到安装路径下BIN文件夹中的Spire.Doc.dll。然后在Visual Studio中打开“解决方案资源管理器”,鼠标右键点击“引用”,“添加引用”,将本地路径BIN文件夹下的dll文件添加引用至程序。

方法2NuGet安装(2种方法)。

(1)可以在Visual Studio中打开“解决方案资源管理器”,鼠标右键点击“引用”,“管理NuGet包”,然后搜索“Free Spire.Doc”,点击“安装”。等待程序安装完成。

(2)将以下内容复制到PM控制台安装:

Install-Package FreeSpire.Doc -Version 10.2.0


 

【添加强调符号】

代码步骤如下,可参考该步骤来实现添加符号:

  • 创建 Document 类的对象。
  • 用 Document.LoadFromFile() 方法从本地加载Word文档。
  • Document.FindAllString()方法查找指定文本字符串。
  • 通过CharacterFormat.EmphasisMark属性添加强调符号到字符串。
  • Document.SaveToFile()方法保存文档为新的Word文档。

C#

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

namespace EmphasisMark
{
    class Program
    {
        static void Main(string[] args)
        {
            //创建Document对象
            Document document = new Document();

            //加载Word文档
            document.LoadFromFile("sample.docx");

            //查找指定字符串
            TextSelection[] textSelections = document.FindAllString("分析报告", false, true);

            //添加强调符号到字符串
            foreach (TextSelection selection in textSelections)
            {
                selection.GetAsOneRange().CharacterFormat.EmphasisMark = Emphasis.DotBelow;
            }

            //保存文档
            document.SaveToFile("Result.docx", FileFormat.Docx2013);
            System.Diagnostics.Process.Start("Result.docx");
        }
    }
}

vb.net

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

Namespace EmphasisMark
    Class Program
        Private Shared Sub Main(args As String())
            '创建Document对象
            Dim document As New Document()

            '加载Word文档
            document.LoadFromFile("sample.docx")

            '查找指定字符串
            Dim textSelections As TextSelection() = document.FindAllString("分析报告", False, True)

            '添加强调符号到字符串
            For Each selection As TextSelection In textSelections
                selection.GetAsOneRange().CharacterFormat.EmphasisMark = Emphasis.DotBelow
            Next

            '保存文档
            document.SaveToFile("Result.docx", FileFormat.Docx2013)
            System.Diagnostics.Process.Start("Result.docx")
        End Sub
    End Class
End Namespace

添加效果:

 

 —End—