using IronQr; using IronSoftware.Drawing; // Open the asset to read a QR Code from var inputBmp = AnyBitmap.FromFile("IMAGE_TO_READ.png"); // Load the asset into QrImageInput QrImageInput imageInput = new QrImageInput(inputBmp); // Create a QR Reader object QrReader reader = new QrReader(); // Read the Input an get all embedded QR Codes IEnumerable<QrResult> results = reader.Read(imageInput);

使用 IRONQR

如何在VB .NET中生成QR Code

發佈 2023年12月12日

QR Code，或稱快速反應碼，已經演變成一種多功能的格式，用於存儲和檢索信息。廣泛應用於從行銷到產品標籤等各個領域，QR Code 圖片提供了一種通過簡單掃描圖像框即可快速高效地訪問信息的方法。

在本文中，我們將探討如何在控制台應用程式中使用 IronQR 庫生成 VB.NET QR Code 條碼。

IronQR

IronQR，作為一個強大的C#快速回應 (QR) 碼系統庫，擴展了其對VB.NET開發人員的支持，用於生成和讀取QR碼。儘管主要為C#設計，IronQR無縫集成了VB.NET，因為它是基於.NET Framework構建的，提供了一種便捷的方法來將其功能結合到VB.NET，輕鬆創建QR碼條碼。其簡單性和廣泛的功能集使其成為尋求高效VB.NET QR碼條碼生成解決方案的開發人員的理想選擇。

先決條件

在深入編寫 VB.NET 以創建 QR Code 之前，請確保您已具備所需的工具：

Visual Studio： 確保已在系統上安裝了 Visual Studio。如果沒有，請從中下載。 官方網站.
IronQR Library: 使用 VS 中的 NuGet 套件管理器安裝 IronQR 程式庫。在套件管理器主控台中執行以下命令：

PM > Install-Package IronQR

此命令會安裝在您的VB.NET專案中使用IronQR所需的套件。

建立一個控制台應用程式

讓我們從建立一個簡單的VB.NET控制台應用程式開始：

打開Visual Studio並選擇 "建立新專案"。
選擇 "控制台應用程式" 作為專案範本，然後點擊 "下一步"。
配置專案設定，然後點擊“下一步”。
在「附加資訊」中，選擇最新的 .NET 框架。
點擊「Create」來生成您的 VB.NET Generate QR Code 應用程式。

使用方案總管安裝 IronQR 庫

設置項目後，點擊方案總管，然後選擇「為方案管理 NuGet 套件」。
在 NuGet 窗口中，點擊「瀏覽」標籤，搜尋 IronQR 並點擊「安裝」按鈕。

在 VB.NET 中實現 QR 碼生成器

在這個 QR 碼生成應用程式中，我們將展示使用 IronQR 庫生成 QR 碼的簡單性和靈活性。 (Visual Basic) VB.NET 標準控制台應用程式。我們從最簡單的方法開始， 創建 QR code 使用預設配置。接著，我們進一步探討更高階的 QR Code 範例，自訂 QR Code 的內容、標誌、大小和版本等參數。更多程式碼範例，請訪問 .NET 的 QR 碼生成器讓我們探索以下示例代碼片段，了解IronBarcode如何簡化在Visual Basic中生成QR碼和條形碼圖像。

Imports IronQr
Imports IronSoftware.Drawing
Imports Color = IronSoftware.Drawing.Color
Module Program
    ' Simplest example of creating a QR Code with no settings:
    Private myQrCode As QrCode = QrWriter.Write("https://ironsoftware.com/")
    ' Save QR Code as a Bitmap
    Private qrImage As AnyBitmap = myQrCode.Save()
    ' Advanced Example to set all parameters:
    ' The value of the QR Code as a string. Also suitable for URLS.
    Private value As String = "https://ironsoftware.com/"
    ' Set QR options
    Private options As New QrOptions(QrErrorCorrectionLevel.High, 20)
    ' Create a QR Code object
    Private myQr As QrCode = QrWriter.Write(value, options)
    ' Fancy style options
    Private logoBmp As New AnyBitmap("VisualStudioLogo.png")
    Private style As New QrStyleOptions With {
        .Dimensions = 300,
        .Margins = 10,
        .Color = Color.Gray,
        .Logo = New QrLogo With {
            .Bitmap = logoBmp,
            .Width = 100,
            .Height = 100,
            .CornerRadius = 2
        }
    }
    ' Save QR Code as a Bitmap
    Private qrImageComplex As AnyBitmap = myQr.Save(style)
    Sub Main(args As String())
    IronQR.License.LicenseKey = "IronQR-MYLICENSE-KEY-1EF01"
        qrImageSimple.SaveAs("simpleQRCode.png")
    qrImageComplex.SaveAs("complexQRCode.png")
    End Sub
End Module

Imports IronQr
Imports IronSoftware.Drawing
Imports Color = IronSoftware.Drawing.Color
Module Program
    ' Simplest example of creating a QR Code with no settings:
    Private myQrCode As QrCode = QrWriter.Write("https://ironsoftware.com/")
    ' Save QR Code as a Bitmap
    Private qrImage As AnyBitmap = myQrCode.Save()
    ' Advanced Example to set all parameters:
    ' The value of the QR Code as a string. Also suitable for URLS.
    Private value As String = "https://ironsoftware.com/"
    ' Set QR options
    Private options As New QrOptions(QrErrorCorrectionLevel.High, 20)
    ' Create a QR Code object
    Private myQr As QrCode = QrWriter.Write(value, options)
    ' Fancy style options
    Private logoBmp As New AnyBitmap("VisualStudioLogo.png")
    Private style As New QrStyleOptions With {
        .Dimensions = 300,
        .Margins = 10,
        .Color = Color.Gray,
        .Logo = New QrLogo With {
            .Bitmap = logoBmp,
            .Width = 100,
            .Height = 100,
            .CornerRadius = 2
        }
    }
    ' Save QR Code as a Bitmap
    Private qrImageComplex As AnyBitmap = myQr.Save(style)
    Sub Main(args As String())
    IronQR.License.LicenseKey = "IronQR-MYLICENSE-KEY-1EF01"
        qrImageSimple.SaveAs("simpleQRCode.png")
    qrImageComplex.SaveAs("complexQRCode.png")
    End Sub
End Module

VB.NET

讓我們逐步解析以上用於創建 QR Code 圖像的源代碼：

1. 匯入語句：

Imports IronQr
    Imports IronSoftware.Drawing
    Imports Color = IronSoftware.Drawing.Color

Imports IronQr
    Imports IronSoftware.Drawing
    Imports Color = IronSoftware.Drawing.Color

VB.NET

以下程式碼行從 IronQR 庫匯入必要的命名空間，提供 QR 碼生成和樣式設置所需的類和方法的訪問權限。

模組宣告

Module Program

Module Program

VB.NET

Module 關鍵字聲明了一個名為 "Program" 的模組，封裝了代碼。模組是 VB.NET 中用來組織代碼的容器。

3. 創建 QR 碼 - 簡單的源代碼範例：

' Simplest example of creating a QR Code with no settings:
    Private myQrCode As QrCode = QrWriter.Write("https://ironsoftware.com/")
    ' Save QR Code as a Bitmap
    Private qrImage As AnyBitmap = myQrCode.Save()

' Simplest example of creating a QR Code with no settings:
    Private myQrCode As QrCode = QrWriter.Write("https://ironsoftware.com/")
    ' Save QR Code as a Bitmap
    Private qrImage As AnyBitmap = myQrCode.Save()

VB.NET

這裡使用 QrWriter.Write 方法，並通過 URL 創建一個簡單的二維碼。 ("https://ironsoftware.com/")結果儲存在 myQrCode 變數中。然後，這個位元組數據結果被保存為 AnyBitmap 圖像，以便稍後保存為 PNG、JPG 圖像格式。

4. QR碼創建 - 高級示例

' The value of the QR code as a string. Also suitable for URLS.
    Private value As String = "https://ironsoftware.com/"
    ' Set QR options
    Private options As New QrOptions(QrErrorCorrectionLevel.High, 20)
    ' Create a QR Code object
    Private myQr As QrCode = QrWriter.Write(value, options)
    ' Fancy style options
    Private logoBmp As New AnyBitmap("VisualStudioLogo.png")
    Private style As New QrStyleOptions With {
    .Dimensions = 300,
            .Margins = 10,
            .Color = Color.Gray,
            .Logo = New QrLogo With {
                .Bitmap = logoBmp,
                .Width = 100,
                .Height = 100,
                .CornerRadius = 2
            }
    }
    ' Save QR Code as a Bitmap
    Private qrImageComplex As AnyBitmap = myQr.Save(style)

' The value of the QR code as a string. Also suitable for URLS.
    Private value As String = "https://ironsoftware.com/"
    ' Set QR options
    Private options As New QrOptions(QrErrorCorrectionLevel.High, 20)
    ' Create a QR Code object
    Private myQr As QrCode = QrWriter.Write(value, options)
    ' Fancy style options
    Private logoBmp As New AnyBitmap("VisualStudioLogo.png")
    Private style As New QrStyleOptions With {
    .Dimensions = 300,
            .Margins = 10,
            .Color = Color.Gray,
            .Logo = New QrLogo With {
                .Bitmap = logoBmp,
                .Width = 100,
                .Height = 100,
                .CornerRadius = 2
            }
    }
    ' Save QR Code as a Bitmap
    Private qrImageComplex As AnyBitmap = myQr.Save(style)

VB.NET

在這個高級範例代碼示例中，我們宣告了自訂 QR Code 的變數。這裡，value 保存了 QR Code 的內容，然後我們使用 QrOptions 類別設定 QrErrorCorrectionLevel。將值和選項傳遞給 QrWriter.Write 以生成 QR Code。logoBmp 保存了 QR Code 的標誌圖像，style 定義其尺寸、邊距、顏色和標誌的寬度、高度以及圓角。最後，圖像以 AnyBitmap 格式儲存，並稍後以 PNG、JPG 圖像格式儲存。

主方法

Sub Main(args As String())
    IronQR.License.LicenseKey = "IronQR-MYLICENSE-KEY-1EF01"
        qrImageSimple.SaveAs("simpleQRCode.png")
    qrImageComplex.SaveAs("complexQRCode.png")
  End Sub

Sub Main(args As String())
    IronQR.License.LicenseKey = "IronQR-MYLICENSE-KEY-1EF01"
        qrImageSimple.SaveAs("simpleQRCode.png")
    qrImageComplex.SaveAs("complexQRCode.png")
  End Sub

VB.NET

在 VB.NET 主控台應用程式中，Main 方法是入口點。設定您的授權金鑰以去除生成的 QR Code 標誌上的浮水印。它分別在 qrImageSimple 和 qrImageComplex 上呼叫 SaveAs 方法，將生成的 QR Code 儲存為圖像檔案。 (「simpleQRCode.png」和「complexQRCode.png」).