ByteScout QR Code SDK – VB.NET – Create Colored QR Code Barcode

Home
/
Articles
/
ByteScout QR Code SDK – VB.NET – Create Colored QR Code Barcode

printable version:
ByteScout-QR-Code-VB-NET-Create-Colored-QR-Code-Barcode.pdf

How to create colored QR code barcode in VB.NET with ByteScout QR Code

This code in VB.NET shows how to create colored QR code barcode with this how to tutorial

Source code documentation samples provide quick and easy way to add a required functionality into your application. ByteScout QR Code is QR Code generation library. It provides full control on the quality, features and encoding. Can embed logo image right into QR Code itself. Batch barcode generation, and many special features like vCard or URL encoding are also supported. It can create colored QR code barcode in VB.NET.

This code snippet below for ByteScout QR Code works best when you need to quickly create colored QR code barcode in your VB.NET application. Just copy and paste the code into your VB.NET application’s code and follow the instruction. You can use these VB.NET sample examples in one or many applications.

Free trial version of ByteScout QR Code is available for download from our website. Get it to try other source code samples for VB.NET.

On-demand (REST Web API) version:
Web API (on-demand version)

On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)

Module1.vb

      Imports System.Drawing
Imports Bytescout.BarCode

Module Module1

    Sub Main()

        ' Create and activate QRCode instance
        Using barcode As New QRCode()

            barcode.RegistrationName = "demo"
            barcode.RegistrationKey = "demo"

            ' Set background color
            barcode.BackColor = Color.Yellow
            ' Set foreground color
            barcode.ForeColor = Color.Red

            ' Set value            
            barcode.Value = "ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz 1234567890"

            ' Save barcode image to file
            barcode.SaveImage("result.png")

        End Using

        ' Open the image in default image viewer (for demo purpose)
        Process.Start("result.png")

    End Sub

End Module