ByteScout QR Code SDK – VB.NET – QR Code With Image

ByteScout QR Code SDK – VB.NET – QR Code With Image

Module1.vb

Imports Bytescout.BarCode

Module Module1

	Sub Main()

		Dim decorationImageFile As String = ".\logo.png"
		Dim outputFile As String = ".\barcode.png"
		Dim barcodeValue As String = "1234567890 abcdefghijklmnopqrstuvwxyz 1234567890 abcdefghijklmnopqrstuvwxyz"

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

			' Set high QR Code error correction level
			barcode.QROption_ErrorCorrectionLevel = QRErrorCorrectionLevel.High

			' Set barcode value
			barcode.Value = barcodeValue

			' Add decoration image and scale it to 15% of the barcode square
			barcode.AddDecorationImage(decorationImageFile, 15)

			' Save generated barcode
			barcode.SaveImage(outputFile)
			
		End Using

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

	End Sub

End Module

  Click here to get your Free Trial version of the SDK