使用IRONQR

如何在VB .NET中生成QR码

发布 2023年十二月12日

QR 码或快速反应代码已发展成为存储和检索信息的通用格式。 QR 码图片广泛应用于从市场营销到产品标签等各个领域，通过简单扫描图片框即可快速高效地获取信息。

在本文中，我们将探讨如何利用 IronQR 库在控制台应用程序中生成 VB.NET QR 码条形码。

IronQR

IronQR在此基础上，VB.NET 开发人员可以使用 C# Quick Response Code 系统库中的 QR Code BarCode 来生成和读取 QR Code。尽管 IronQR 主要是为 C# 设计的，但它可以与 VB.NET 无缝集成，因为它建立在 .NET Framework 的基础上，提供了一种无障碍的方式，可以将其功能纳入其中，使用 VB.NET 轻松创建 QR Code 条形码。对于寻求高效 VB.NET QR Code BarCode 条码生成器解决方案的开发人员来说，其简易性和广泛的功能集使其成为理想的选择。

先决条件

在深入研究在 VB.NET 中创建 QR 码的编码过程之前，请确保您已准备好所需的工具：

Visual Studio： 确保您的系统已安装 Visual Studio。如果没有，请从官方网站.
IronQR 库： 使用 VS 中的 NuGet 包管理器安装 IronQR 库。在软件包管理器控制台中执行以下命令：

PM > Install-Package IronQR

该命令安装必要的软件包，以便在 VB.NET 项目中使用 IronQR。

创建控制台应用程序

让我们从建立一个简单的 VB.NET 控制台应用程序开始：

打开 Visual Studio，选择 "创建新项目"。
选择 "控制台应用程序 "作为项目模板，然后单击 "下一步"。
配置项目设置，然后单击 "下一步"。
在附加信息中，选择最新的 .NET Framework。
点击 "创建 "生成您的 VB.NET 生成 QR 代码应用程序。

使用解决方案资源管理器安装 IronQR 库

项目设置完成后，单击 "解决方案资源管理器"，然后选择 "管理解决方案的 NuGet 包"。
在 NuGet 窗口中，单击 "浏览 "选项卡并搜索 IronQR，然后单击 "安装 "按钮。

在 VB.NET 中实现 QR 码生成器

在这个 QR 代码生成应用程序中，我们将展示使用 IronQR 库生成 QR 代码的简单性和灵活性，在一个(Visual Basic)VB.NET 控制台应用程序。我们从最直接的方法开始、创建二维码默认配置。然后，我们将以更高级的 QR 代码为例，对 QR 代码的内容、徽标、大小和版本等参数进行自定义。更多代码示例，请访问用于 .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

让我们逐步分解上述创建二维码图像的源代码：

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 代码生成和样式所需的类和方法的访问。

2.模块声明

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 代码的变量。这里，value 包含二维码的内容，然后我们使用 QrOptions 类设置QrErrorCorrectionLevel。然后将值和选项传递给 QrWriter.Write，以生成 QR 代码。 logoBmp 保存二维码徽标图像，style 定义其尺寸、边距、颜色、徽标宽度、高度和圆角。最后，将图像保存为AnyBitmap，并进行样式处理，之后再保存为 PNG、JPG 图像格式。

5.主要方法

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 代码徽标中移除 wartermarks。它分别调用qrImageSimple和qrImageComplex的SaveAs方法，将生成的二维码保存为图像文件("simpleQRCode.png "和 "complexQRCode.png").