C#/VB.NET怎么實現在PDF表格中添加條形碼

這篇文章主要介紹了C#/VB.NET怎么實現在PDF表格中添加條形碼的相關知識，內容詳細易懂，操作簡單快捷，具有一定借鑒價值，相信大家閱讀完這篇C#/VB.NET怎么實現在PDF表格中添加條形碼文章都會有所收獲，下面我們一起來看看吧。

類庫引入及代碼思路

本次功能測試中，使用 Free Spire.PDF for .NET。

實現功能的大致思路：生成條形碼，將條形碼保存為圖片，然后在PDF中的表格單元格中插入條碼圖片。

Spire.PDF for .NET 中的Spire.Pdf.Barcode namespace提供了多種Barcode類型，用于滿足創建不同類型barcode的需求，如圖：

Spire.Pdf.dll文件的引入方法如下：

方法1

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

方法2

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

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

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

Install-Package FreeSpire.PDF -Version 8.2.0

代碼示例

C#

using Spire.Pdf;
using Spire.Pdf.Barcode;
using Spire.Pdf.Graphics;
using Spire.Pdf.Grid;
using System.Drawing;

namespace AddBarcodeToTable
{
    class Program
    {
        static void Main(string[] args)
        {
            //創建PDF文檔
            PdfDocument pdf = new PdfDocument();
            PdfPageBase page = pdf.Pages.Add();   
            
            //創建PdfGrid類的表格對象
            PdfGrid grid = new PdfGrid();
            grid.Style.CellPadding = new PdfPaddings(1, 1, 1, 1);
            grid.Style.Font = new PdfTrueTypeFont(new Font("Arial Unicode MS", 9f), true);

            //添加2行2列到表格
            PdfGridRow row1 = grid.Rows.Add();
            PdfGridRow row2 = grid.Rows.Add();       
            grid.Columns.Add(2);

            //設置列寬 
            foreach (PdfGridColumn column in grid.Columns)
            {
                column.Width = 150f;
            }

            //在單元格中寫入數據 
            row1.Cells[0].Value = "產品編號";
            row1.Cells[1].Value = "條碼";
            row2.Cells[0].Value = "B0215";
            
            //創建條碼
            PdfCodabarBarcode barcode1 = new PdfCodabarBarcode("00:12-3456/7890");
            barcode1.BarcodeToTextGapHeight = 1f;
            barcode1.EnableCheckDigit = true;
            barcode1.ShowCheckDigit = true;          
            barcode1.TextDisplayLocation = TextLocation.Bottom;
            barcode1.TextColor = Color.Blue;           

            //將條碼保存為圖片到指定路徑
            Image image =barcode1.ToImage();           
            image.Save(@"F:/VS2017Project/DrawTable_PDF/AddBarcodeToTable/bin/Debug/BarcodeImage.png");

            //將條碼圖片添加到表格單元格
            string imgpath = "F:/VS2017Project/DrawTable_PDF/AddBarcodeToTable/bin/Debug/BarcodeImage.png";           
            PdfGridCellContentList contentList = new PdfGridCellContentList();
            PdfGridCellContent content = new PdfGridCellContent();
            SizeF imageSize = new SizeF(120, 80);
            content.ImageSize = imageSize;
            content.Image = PdfImage.FromFile(imgpath);           
            contentList.List.Add(content);
            row2.Cells[1].Value = contentList;           

            //繪制表格到頁面指定位置
            grid.Draw(page, new PointF(0, 40));

            //保存PDF文檔
            pdf.SaveToFile("AddBarcodeToTable.pdf",FileFormat.PDF);
            System.Diagnostics.Process.Start("AddBarcodeToTable.pdf");
        }
    }
}

vb.net

Imports Spire.Pdf
Imports Spire.Pdf.Barcode
Imports Spire.Pdf.Graphics
Imports Spire.Pdf.Grid
Imports System.Drawing

Namespace AddBarcodeToTable
    Class Program
        Private Shared Sub Main(args As String())
            '創建PDF文檔
            Dim pdf As New PdfDocument()
            Dim page As PdfPageBase = pdf.Pages.Add()

            '創建PdfGrid類的表格對象
            Dim grid As New PdfGrid()
            grid.Style.CellPadding = New PdfPaddings(1, 1, 1, 1)
            grid.Style.Font = New PdfTrueTypeFont(New Font("Arial Unicode MS", 9F), True)

            '添加2行2列到表格
            Dim row1 As PdfGridRow = grid.Rows.Add()
            Dim row2 As PdfGridRow = grid.Rows.Add()
            grid.Columns.Add(2)

            '設置列寬 
            For Each column As PdfGridColumn In grid.Columns
                column.Width = 150F
            Next

            '在單元格中寫入數據 
            row1.Cells(0).Value = "產品編號"
            row1.Cells(1).Value = "條碼"
            row2.Cells(0).Value = "B0215"

            '創建條碼
            Dim barcode1 As New PdfCodabarBarcode("00:12-3456/7890")
            barcode1.BarcodeToTextGapHeight = 1F
            barcode1.EnableCheckDigit = True
            barcode1.ShowCheckDigit = True
            barcode1.TextDisplayLocation = TextLocation.Bottom
            barcode1.TextColor = Color.Blue

            '將條碼保存為圖片到指定路徑
            Dim image As Image = barcode1.ToImage()
            image.Save("F:/VS2017Project/DrawTable_PDF/AddBarcodeToTable/bin/Debug/BarcodeImage.png")

            '將條碼圖片添加到表格單元格
            Dim imgpath As String = "F:/VS2017Project/DrawTable_PDF/AddBarcodeToTable/bin/Debug/BarcodeImage.png"
            Dim contentList As New PdfGridCellContentList()
            Dim content As New PdfGridCellContent()
            Dim imageSize As New SizeF(120, 80)
            content.ImageSize = imageSize
            content.Image = PdfImage.FromFile(imgpath)
            contentList.List.Add(content)
            row2.Cells(1).Value = contentList

            '繪制表格到頁面指定位置
            grid.Draw(page, New PointF(0, 40))

            '保存PDF文檔
            pdf.SaveToFile("AddBarcodeToTable.pdf", FileFormat.PDF)
            System.Diagnostics.Process.Start("AddBarcodeToTable.pdf")
        End Sub
    End Class
End Namespace

文檔效果：

關于“C#/VB.NET怎么實現在PDF表格中添加條形碼”這篇文章的內容就介紹到這里，感謝各位的閱讀！相信大家對“C#/VB.NET怎么實現在PDF表格中添加條形碼”知識都有一定的了解，大家如果還想學習更多知識，歡迎關注億速云行業資訊頻道。