Cómo generar un código QR en VB.NET

IronQR

IronQR, una robusta biblioteca de sistema de Código de Respuesta Rápida C#, extiende su soporte a los desarrolladores de VB.NET para la generación de códigos de barras QR y la lectura de Código QR. A pesar de estar diseñado principalmente para C#, IronQR se integra sin problemas con VB.NET, ya que está construido sobre .NET Framework, proporcionando una forma accesible de incorporar su funcionalidad para crear fácilmente códigos de barras QR usando VB.NET. Su simplicidad y amplio conjunto de características lo convierten en una opción ideal para los desarrolladores que buscan soluciones eficientes de generadores de códigos de barras QR en VB.NET.

Requisitos previos

Antes de profundizar en el proceso de codificación para crear un Código QR en VB.NET, asegúrese de tener las herramientas necesarias en su lugar:

1. Visual Studio: Asegúrese de que Visual Studio esté instalado en su sistema. Si no, descárguelo desde el sitio web oficial.
2. Biblioteca IronQR: Instale la biblioteca IronQR utilizando el Administrador de Paquetes NuGet en VS. Ejecute el siguiente comando en la Consola del Administrador de Paquetes:

Install-Package IronQR

Este comando instala los paquetes necesarios para trabajar con IronQR en su proyecto VB.NET.

Creación de una aplicación de consola

Vamos a comenzar configurando una simple Aplicación de Consola VB.NET:

1. Abra Visual Studio y elija "Crear un nuevo proyecto".
2. Seleccione "Aplicación de Consola" como la plantilla de proyecto y haga clic en "Siguiente".

3. Configure la configuración del proyecto y haga clic en "Siguiente".

4. En Información adicional, seleccione el último marco .NET.

5. Haga clic en "Crear" para generar su aplicación VB.NET Generate QR Code.

Instalar la biblioteca IronQR mediante el Explorador de soluciones

1. Con el proyecto configurado, haga clic en el Explorador de Soluciones y seleccione Administrar Paquetes NuGet para la Solución.

2. En la ventana NuGet, haga clic en la pestaña Examinar y busque IronQR y haga clic en el botón Instalar.

Implementación del generador de códigos QR en VB.NET

En esta aplicación de generación de códigos QR, mostraremos la simplicidad y flexibilidad de generar Código QR utilizando la biblioteca IronQR dentro de una Aplicación de Consola VB.NET. Comenzamos con el enfoque más sencillo, creando un código QR con una configuración predeterminada. Luego, pasaremos a un ejemplo más avanzado de Código QR, personalizando parámetros como el contenido del código QR, el logotipo, el tamaño y la versión. Para más ejemplos de código, por favor visite generador de código QR para .NET.

Exploremos el siguiente fragmento de código de ejemplo y entendamos cómo IronBarcode simplifica la generación de QR Code, generación de imágenes de código de barras en Visual Basic.

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

Module Program
    ' Simplest example of creating a QR Code with no settings
    Private qrImageSimple As AnyBitmap

    Sub Main(args As String())
        ' Set your license key to remove watermarks
        IronQR.License.LicenseKey = "IronQR-MYLICENSE-KEY-1EF01"

        ' Simple QR Code generation
        Dim myQrCode As QrCode = QrWriter.Write("https://ironsoftware.com/")
        qrImageSimple = myQrCode.Save()
        qrImageSimple.SaveAs("simpleQRCode.png")

        ' Advanced Example to set all parameters
        ' Value for the QR code
        Dim value As String = "https://ironsoftware.com/"
        ' Set QR options like error correction level and margin
        Dim options As New QrOptions(QrErrorCorrectionLevel.High, 20)
        ' Create QR code with options
        Dim myQr As QrCode = QrWriter.Write(value, options)

        ' Adding a logo and defining style options
        Dim logoBmp As New AnyBitmap("VisualStudioLogo.png")
        Dim 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 advanced styled QR Code as a Bitmap
        Dim qrImageComplex As AnyBitmap = myQr.Save(style)
        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 qrImageSimple As AnyBitmap

    Sub Main(args As String())
        ' Set your license key to remove watermarks
        IronQR.License.LicenseKey = "IronQR-MYLICENSE-KEY-1EF01"

        ' Simple QR Code generation
        Dim myQrCode As QrCode = QrWriter.Write("https://ironsoftware.com/")
        qrImageSimple = myQrCode.Save()
        qrImageSimple.SaveAs("simpleQRCode.png")

        ' Advanced Example to set all parameters
        ' Value for the QR code
        Dim value As String = "https://ironsoftware.com/"
        ' Set QR options like error correction level and margin
        Dim options As New QrOptions(QrErrorCorrectionLevel.High, 20)
        ' Create QR code with options
        Dim myQr As QrCode = QrWriter.Write(value, options)

        ' Adding a logo and defining style options
        Dim logoBmp As New AnyBitmap("VisualStudioLogo.png")
        Dim 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 advanced styled QR Code as a Bitmap
        Dim qrImageComplex As AnyBitmap = myQr.Save(style)
        qrImageComplex.SaveAs("complexQRCode.png")
    End Sub
End Module

Desglosaremos paso a paso el código fuente anterior para crear imágenes de Código QR:

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

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

Module Program

Module Program

' Simplest example of creating a QR Code with no settings:
Dim myQrCode As QrCode = QrWriter.Write("https://ironsoftware.com/")
qrImageSimple = myQrCode.Save()
qrImageSimple.SaveAs("simpleQRCode.png")

' Simplest example of creating a QR Code with no settings:
Dim myQrCode As QrCode = QrWriter.Write("https://ironsoftware.com/")
qrImageSimple = myQrCode.Save()
qrImageSimple.SaveAs("simpleQRCode.png")

' The value of the QR code as a string. Also suitable for URLs.
Dim value As String = "https://ironsoftware.com/"
' Set QR options
Dim options As New QrOptions(QrErrorCorrectionLevel.High, 20)
' Create a QR Code object
Dim myQr As QrCode = QrWriter.Write(value, options)

' Fancy style options
Dim logoBmp As New AnyBitmap("VisualStudioLogo.png")
Dim 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
Dim qrImageComplex As AnyBitmap = myQr.Save(style)
qrImageComplex.SaveAs("complexQRCode.png")

' The value of the QR code as a string. Also suitable for URLs.
Dim value As String = "https://ironsoftware.com/"
' Set QR options
Dim options As New QrOptions(QrErrorCorrectionLevel.High, 20)
' Create a QR Code object
Dim myQr As QrCode = QrWriter.Write(value, options)

' Fancy style options
Dim logoBmp As New AnyBitmap("VisualStudioLogo.png")
Dim 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
Dim qrImageComplex As AnyBitmap = myQr.Save(style)
qrImageComplex.SaveAs("complexQRCode.png")

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

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

Ejecutar la aplicación de consola y ver la salida

Ejecute la Aplicación de Consola, y debería ver un mensaje de éxito que indica que el Código QR ha sido generado y guardado.

Salida de imagen del Código QR simple:

Salida de imagen del código QR complejo:

Conclusión

Este artículo demostró la generación de Códigos QR utilizando VB.NET y la biblioteca IronQR en una Aplicación de Consola. Siguiendo los pasos descritos, los desarrolladores pueden integrar fácilmente la generación de Códigos QR en sus proyectos VB.NET, ofreciendo una forma rápida y eficiente de codificar información para diversas aplicaciones. Explore la documentación de IronQR para obtener opciones de personalización y características adicionales.

IronQR es una versátil biblioteca .NET especializada en operaciones de código QR. Permite la generación de Códigos QR, admite variaciones estilizadas, y reconoce varios formatos y tipos de código QR. La biblioteca sobresale en guardar Códigos QR en formatos de imagen como JPEG, PNG, BMP, TIFF y GIF a través del método SaveAsImage(), facilitando la integración y almacenamiento sin problemas.

Para propósitos de desarrollo, IronQR es accesible libremente pero con una marca de agua. El uso comercial requiere una licencia para que los usuarios evalúen su funcionalidad completa.