C#/VB.NET 在Word中添加条码、二维码

本文介绍如何通过C# 和VB.NET代码实现在Word文档中添加条码和二维码。代码中将分为在Word正文段落中、页眉页脚中等情况来添加。

使用工具：Free Spire.Office for .NET （免费版）

工具简介：这是Spire所有.NET平台下免费产品的集合包，包含Spire.Barcode.dll、Spire.DataExport.dll、Spire.Pdf.dll、Spire.Doc.dll、Spire.DocViewer.Forms.dll 、Spire.PdfViewer.Forms.dll 、Spire.Presentation.dll 、Spire.XLS.dll等dll可用于操作Word/PDF/Excel/PPT等文件。

本文添加条码、二维码需要在VS程序中添加引用 Spire.Doc.dll 和 Spire.Barcode.dll 这两个dll文件。

dll添加引用效果：

 

 

 

注意：

1. 需要下载安装到本地指定路径，dll文件可在安装路径下的Bin文件夹下获取。

2. 生成的条码、二维码会有水印字样的文字，可通过此方法去除。

 

---

 

代码示例

1. 添加条码到Word

C#

using Spire.Doc;using Spire.Barcode;using System.Drawing;using System.IO;using Spire.Doc.Documents;namespace AddBarcode{ class Program {  static void Main(string[] args)  {   //调用方法 ApplyKey(string key) 移除水印文字   Spire.Barcode.BarcodeSettings.ApplyKey("在这里输入去除水印字样的序列号");   //创建Document对象，加载Word文档   Document doc = new Document();   doc.LoadFromFile("test.docx");   //获取第2节   Section section = doc.Sections[1];   //使用Spire.Barcode的BarcodeSettings和BarcodeGenerator类创建条码并保存为图片   BarcodeSettings settings = new BarcodeSettings();   settings.Type = BarCodeType.Code128;   settings.Data = "123456789";   settings.Data2D = "123456789";   settings.ShowText = false;   settings.BarHeight = 4;   settings.X = 0.3f;   settings.HasBorder = true;   settings.BorderWidth = 0.5f;   settings.BorderColor = Color.AliceBlue;   settings.BackColor = Color.Wheat;   BarCodeGenerator barCodeGenerator = new BarCodeGenerator(settings);   Image Image = barCodeGenerator.GenerateImage();   //Image.Save("Barcode.png", System.Drawing.Imaging.ImageFormat.Png);//如果需要保存生成的Barcode图片，可执行此步骤代码   //添加条码到正文段落   Paragraph paragraph = section.AddParagraph();   paragraph.Text = "收货码：";   paragraph.AppendPicture(Image);   paragraph.Format.HorizontalAlignment = HorizontalAlignment.Right;   //添加条码图片到Word页脚   HeaderFooter footer = section.HeadersFooters.Footer;   Paragraph footerpara = footer.AddParagraph();   footerpara.Text = "扫码识真伪：";   footerpara.AppendPicture(Image);   footerpara.Format.HorizontalAlignment = HorizontalAlignment.Left;   //保存文档   doc.SaveToFile("BarCodeToWord.docx", FileFormat.Docx2013);   System.Diagnostics.Process.Start("BarCodeToWord.docx");  } }}

条码添加效果：

 

VB.NET

Imports Spire.DocImports Spire.BarcodeImports System.DrawingImports System.IOImports Spire.Doc.DocumentsNamespace AddBarcode Class Program  Private Shared Sub Main(args As String())   '调用方法 ApplyKey(string key) 移除水印文字   Spire.Barcode.BarcodeSettings.ApplyKey("在这里输入去除水印字样的序列号")   '创建Document对象，加载Word文档   Dim doc As New Document()   doc.LoadFromFile("test.docx")   '获取第2节   Dim section As Section = doc.Sections(1)   '使用Spire.Barcode的BarcodeSettings和BarcodeGenerator类创建条码并保存为图片   Dim settings As New BarcodeSettings()   settings.Type = BarCodeType.Code128   settings.Data = "123456789"   settings.Data2D = "123456789"   settings.ShowText = False   settings.BarHeight = 4   settings.X = 0.3F   settings.HasBorder = True   settings.BorderWidth = 0.5F   settings.BorderColor = Color.AliceBlue   settings.BackColor = Color.Wheat   Dim barCodeGenerator As New BarCodeGenerator(settings)   Dim Image As Image = barCodeGenerator.GenerateImage()   'Image.Save("Barcode.png", System.Drawing.Imaging.ImageFormat.Png);//如果需要保存生成的Barcode图片，可执行此步骤代码   '添加条码到正文段落   Dim paragraph As Paragraph = section.AddParagraph()   paragraph.Text = "收货码："   paragraph.AppendPicture(Image)   paragraph.Format.HorizontalAlignment = HorizontalAlignment.Right   '添加条码图片到Word页脚   Dim footer As HeaderFooter = section.HeadersFooters.Footer   Dim footerpara As Paragraph = footer.AddParagraph()   footerpara.Text = "扫码识真伪："   footerpara.AppendPicture(Image)   footerpara.Format.HorizontalAlignment = HorizontalAlignment.Left   '保存文档   doc.SaveToFile("BarCodeToWord.docx", FileFormat.Docx2013)   System.Diagnostics.Process.Start("BarCodeToWord.docx")  End Sub End ClassEnd Namespace

 

2. 添加二维码到Word

C#

using Spire.Doc;using Spire.Barcode;using System.Drawing;using System.IO;using Spire.Doc.Documents;using System;namespace AddQRCode{ class Program {  static void Main(string[] args)  {   //调用方法 ApplyKey(string key) 移除水印文字   Spire.Barcode.BarcodeSettings.ApplyKey("在这里输入去除水印字样的序列号");   //创建Document对象，加载Word文档   Document doc = new Document();   doc.LoadFromFile("test.docx");   //获取第2节   Section section = doc.Sections[1];   //使用Spire.Barcode的BarcodeSettings和BarcodeGenerator类创建二维码并保存为图片   BarcodeSettings settings = new BarcodeSettings();   settings.Type = BarCodeType.QRCode;   settings.ImageWidth = 50;   settings.ImageHeight = 50;   settings.Data = "123456";   settings.Data2D = "123456";   settings.X =0.7f;   settings.LeftMargin = 1;   settings.ShowTextOnBottom = true;   settings.QRCodeECL = QRCodeECL.Q;   settings.QRCodeDataMode = QRCodeDataMode.Numeric;   BarCodeGenerator generator = new BarCodeGenerator(settings);   Image image = generator.GenerateImage();   //image.Save("QRCode.png", System.Drawing.Imaging.ImageFormat.Png);//如果需要保存生成的二维码图片，可执行此步骤代码   //添加二维码到正文段落   Paragraph paragraph = section.AddParagraph();      paragraph.AppendPicture(image);   paragraph.Format.HorizontalAlignment = HorizontalAlignment.Right;   //添加二维码图片到Word页眉   HeaderFooter header = section.HeadersFooters.Header;   //HeaderFooter footer = section.HeadersFooters.Footer;//获取页脚   Paragraph headerpara = header.AddParagraph();   headerpara.AppendPicture(image);   headerpara.Format.HorizontalAlignment = HorizontalAlignment.Center;      //保存文档   doc.SaveToFile("QRCodeToHeader.docx", FileFormat.Docx2013);   System.Diagnostics.Process.Start("QRCodeToHeader.docx");  } }}

二维码添加效果:

 

VB.NET

Imports Spire.DocImports Spire.BarcodeImports System.DrawingImports System.IOImports Spire.Doc.DocumentsNamespace AddQRCode Class Program  Private Shared Sub Main(args As String())   '调用方法 ApplyKey(string key) 移除水印文字   Spire.Barcode.BarcodeSettings.ApplyKey("在这里输入去除水印字样的序列号")   '创建Document对象，加载Word文档   Dim doc As New Document()   doc.LoadFromFile("test.docx")   '获取第2节   Dim section As Section = doc.Sections(1)   '使用Spire.Barcode的BarcodeSettings和BarcodeGenerator类创建二维码并保存为图片   Dim settings As New BarcodeSettings()   settings.Type = BarCodeType.QRCode   settings.ImageWidth = 50   settings.ImageHeight = 50   settings.Data = "123456"   settings.Data2D = "123456"   settings.X = 0.7F   settings.LeftMargin = 1   settings.ShowTextOnBottom = True   settings.QRCodeECL = QRCodeECL.Q   settings.QRCodeDataMode = QRCodeDataMode.Numeric   Dim generator As New BarCodeGenerator(settings)   Dim image As Image = generator.GenerateImage()   'image.Save("QRCode.png", System.Drawing.Imaging.ImageFormat.Png);//如果需要保存生成的二维码图片，可执行此步骤代码   '添加二维码到正文段落   Dim paragraph As Paragraph = section.AddParagraph()   paragraph.AppendPicture(image)   paragraph.Format.HorizontalAlignment = HorizontalAlignment.Right   '添加二维码图片到Word页眉   Dim header As HeaderFooter = section.HeadersFooters.Header   'HeaderFooter footer = section.HeadersFooters.Footer;//获取页脚   Dim headerpara As Paragraph = header.AddParagraph()   headerpara.AppendPicture(image)   headerpara.Format.HorizontalAlignment = HorizontalAlignment.Center   '保存文档   doc.SaveToFile("QRCodeToHeader.docx", FileFormat.Docx2013)   System.Diagnostics.Process.Start("QRCodeToHeader.docx")  End Sub End ClassEnd Namespace

 

（完）

C#/VB.NET 在Word中添加条码、二维码patpat、 美菜网、 杨帆、 旺季亚马逊的货大家都是选择什么样的物流运输方式？ -、 亚马逊站内广告每日预算如何设置？这些细节不可忽视！、 TikTok网红带货及商业化路径分析、 韩国秋季赏枫最佳旅游好去处推荐给大家、 冬日去腾冲旅游攻略指南，腾冲有哪些好玩的旅游景点、 佛山一日游吃住行旅游全攻略指南、