本文介绍如何通过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.Doc
Imports Spire.Barcode
Imports System.Drawing
Imports System.IO
Imports Spire.Doc.Documents
Namespace 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 Class
End 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.Doc
Imports Spire.Barcode
Imports System.Drawing
Imports System.IO
Imports Spire.Doc.Documents
Namespace 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 Class
End Namespace
二维码添加效果:
以上就是C#/VB.NET 在Word中添加条码、二维码的示例代码的详细内容,更多关于C#/VB.NET 在Word中添加条码、二维码的资料请关注其它相关文章!
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
RTX 5090要首发 性能要翻倍!三星展示GDDR7显存
三星在GTC上展示了专为下一代游戏GPU设计的GDDR7内存。
首次推出的GDDR7内存模块密度为16GB,每个模块容量为2GB。其速度预设为32 Gbps(PAM3),但也可以降至28 Gbps,以提高产量和初始阶段的整体性能和成本效益。
据三星表示,GDDR7内存的能效将提高20%,同时工作电压仅为1.1V,低于标准的1.2V。通过采用更新的封装材料和优化的电路设计,使得在高速运行时的发热量降低,GDDR7的热阻比GDDR6降低了70%。
更新日志
- 小骆驼-《草原狼2(蓝光CD)》[原抓WAV+CUE]
- 群星《欢迎来到我身边 电影原声专辑》[320K/MP3][105.02MB]
- 群星《欢迎来到我身边 电影原声专辑》[FLAC/分轨][480.9MB]
- 雷婷《梦里蓝天HQⅡ》 2023头版限量编号低速原抓[WAV+CUE][463M]
- 群星《2024好听新歌42》AI调整音效【WAV分轨】
- 王思雨-《思念陪着鸿雁飞》WAV
- 王思雨《喜马拉雅HQ》头版限量编号[WAV+CUE]
- 李健《无时无刻》[WAV+CUE][590M]
- 陈奕迅《酝酿》[WAV分轨][502M]
- 卓依婷《化蝶》2CD[WAV+CUE][1.1G]
- 群星《吉他王(黑胶CD)》[WAV+CUE]
- 齐秦《穿乐(穿越)》[WAV+CUE]
- 发烧珍品《数位CD音响测试-动向效果(九)》【WAV+CUE】
- 邝美云《邝美云精装歌集》[DSF][1.6G]
- 吕方《爱一回伤一回》[WAV+CUE][454M]


