The sample source codes on this page will demonstrate you how to make encode unicode value to QR code in VBScript and VB6. Encode unicode value to QR code in VBScript and VB6 can be implemented with ByteScout QR Code. ByteScout QR Code 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.
The SDK samples like this one below explain how to quickly make your application do encode unicode value to QR code in VBScript and VB6 with the help of ByteScout QR Code. Follow the instruction from the scratch to work and copy and paste code for VBScript and VB6 into your editor. Enjoy writing a code with ready-to-use sample VBScript and VB6 codes to implement encode unicode value to QR code using ByteScout QR Code.
ByteScout QR Code is available as free trial. You may get it from our website along with all other source code samples for VBScript and VB6 applications.
' Create and activate QRCode instance Set barcode = CreateObject("Bytescout.BarCode.QRCode") barcode.RegistrationName = "demo" barcode.RegistrationKey = "demo" ' Set barcode value barcode.Value = "ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz 1234567890" ' Set the character encoding to UTF-16 barcode.SetCharacterEncoding "utf-16" ' Set Unicode barcode value barcode.Value = "??" ' Show barcode caption (optional) barcode.DrawCaption = True ' Save barcode image to file barcode.SaveImage("result.png") ' Open the image in default image viewer (for demo purpose) Set shell = CreateObject("WScript.Shell") shell.Run "result.png", 1, false Set shell = Nothing Set barcode = Nothing