C#/VB.NET在 Word 中插入水印

C#/VB.NET在 Word中插入水印

水印是指在 Word 文档的背景中以淡色或灰色显示的文本或图像。它们可用于声明文档的机密性、版权或其他属性，也可以仅用作装饰，使文档更具吸引力。下面将为大家展示如何使用Free Spire.Doc for .NET在C#和VB.NET程序中给Word文档插入文本水印和图片水印。

安装Free Spire.Doc for .NET

方法一：通过​​NuGet​​安装Free Spire.Doc for .NET

具体步骤为：依次选择工具>NuGet包管理器>程序包管理器控制台，然后执行以下命令：

PM> Install-Package FreeSpire.Doc     

方法二：在程序中手动引入Spire.doc.dll文件

将​​Free Spire.Doc for .NET​​ 下载到本地，解压并安装。安装完成后，打开Visual Studio创建新项目，在右边的“解决方案资源管理器”中右键点击“引用”，再依次选择“添加引用”> “浏览”，找到安装路径下BIN文件夹中的dll文件，点击“确定”，将其添加引用至程序中。

在 Word 文档中插入文本水印

详细步骤如下：

• 创建Document类的对象。
• 通过Document.LoadFromFile()方法从磁盘加载 Word 文档。
• 使用自定义方法 InsertTextWatermark()， 在文档中插入文本水印。
• 最后，通过Doucment.SaveToFile()方法保存文档。

C#：​

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

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

            //从磁盘加载 Word 文档
            document.LoadFromFile(@"西双版纳.docx");

           
//插入文本水印
           
InsertTextWatermark(document.Sections[0]);

           
//保存文档
           
document.SaveToFile("西双版纳 文本水印.docx", FileFormat.Docx);
       
}
       
private static void InsertTextWatermark(Section section)
       
{
           
TextWatermark txtWatermark = new TextWatermark();
           
txtWatermark.Text = "请勿复制";
           
txtWatermark.FontSize = 50;
           
txtWatermark.Color = Color.Blue;
           
txtWatermark.Layout = WatermarkLayout.Diagonal;
           
section.Document.Watermark = txtWatermark;

       
}
    }
}

VB.NET

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

Module Program
    Sub Main(args As String())
        '创建Document类的对象        Dim document As New Document()

        '从磁盘加载 Word 文档
        document.LoadFromFile("西双版纳.docx")

        '插入文本水印
        InsertTextWatermark(document.Sections(0))

        '保存文档
        document.SaveToFile("西双版纳 文本水印.docx", FileFormat.Docx)
    End Sub
    Private Sub InsertTextWatermark(ByVal section As Section)
        Dim txtWatermark As New Spire.Doc.TextWatermark()
        txtWatermark.Text = "请勿复制"
        txtWatermark.FontSize = 50
        txtWatermark.Color = Color.Blue
        txtWatermark.Layout = WatermarkLayout.Diagonal
        section.Document.Watermark = txtWatermark
    End Sub
End Module

在 Word 文档中插入图片水印

详细步骤如下：

• 创建Document类的对象。
• 通过Document.LoadFromFile()方法从磁盘加载 Word 文档。
• 使用自定义方法 InsertImageWatermark()， 在文档中插入图片水印。
• 最后，通过Doucment.SaveToFile()方法保存文档。

C#

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

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

            //从磁盘加载 Word 文档
            document.LoadFromFile(@"西双版纳.docx");

            //插入图片水印
            InsertImageWatermark(document);

            //保存文档
            document.SaveToFile("西双版纳 图片水印.docx", FileFormat.Docx);        
        }
        private static void InsertImageWatermark(Document document)
        {
            PictureWatermark picture = new PictureWatermark();
            picture.Picture = Image.FromFile(@"水印.png");
            picture.Scaling = 200;
            picture.IsWashout = false;
            document.Watermark = picture;
        }
    }
}

VB.NET

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

Module Program
    Sub Main(args As String())
        '创建Document类的对象
        Dim document As New Document()
        
        '从磁盘加载 Word 文档
        document.LoadFromFile("西双版纳.docx")

        '插入图片水印
        InsertImageWatermark(document)

        '保存文档
        document.SaveToFile("西双版纳 图片水印.docx", FileFormat.Docx)
    End Sub
    Private Sub InsertImageWatermark(ByVal document As Document)
        Dim picture As New PictureWatermark()
        picture.Picture = Image.FromFile("水印.png")
        picture.Scaling = 250
        picture.IsWashout = False
        document.Watermark = picture
    End Sub
End Module