The sample source code below will teach you how to make QR code with embedded image in VBScript and VB6. What is ByteScout QR Code? It is QR Code barcode generator SDK with tunnable quality and features like QR Code embedded logo or images. Supports batch generation and specialized features like encoding of vCard and other structures inside QR Code barcodes. It can help you to make QR code with embedded image in your VBScript and VB6 application.
This rich sample source code in VBScript and VB6 for ByteScout QR Code includes the number of functions and options you should do calling the API to make QR code with embedded image. In order to implement the functionality, you should copy and paste this code for VBScript and VB6 below into your code editor with your app, compile and run your application. This basic programming language sample code for VBScript and VB6 will do the whole work for you to make QR code with embedded image.
Free trial version of ByteScout QR Code is available on our website. Documentation and source code samples are included.
' Create and activate QRCode instance Set barcode = CreateObject("Bytescout.BarCode.QRCode") barcode.RegistrationName = "demo" barcode.RegistrationKey = "demo" ' Set high QR Code error correction level barcode.QROption_ErrorCorrectionLevel = 3 ' 3 = QRErrorCorrectionLevel.High ' Set barcode value barcode.Value = "1234567890 abcdefghijklmnopqrstuvwxyz 1234567890 abcdefghijklmnopqrstuvwxyz" ' Add decoration image and scale it to 15% of the barcode square barcode.AddDecorationImage ".\logo.png", 15 barcode.SaveImage "result.png" ' Open the output file in default app Set shell = CreateObject("WScript.Shell") shell.Run "result.png", 1, false Set shell = Nothing Set barcode = Nothing