Description
Provides the ability to generate a BARCODE image from a specified string.
NOTES
- Reference to AUExpress.Cells library.
- Supported BARCODE types:
- Code11, Code32, Code39, Code39E, Code93, Code128, Codabar.
- EAN-8, EAN-13, EAN-14, UPC-A, UPC-E, ITF, ITF14, PDF417.
- DataMatrix, Databar, Databar Limitted, Databar Expanned.
- QR Code, Maxi Code, Dot Code, Micro QR Code.
Syntax
Dim cls As New AUBarcode
cls.ShowText = True
cls.Factor = 2
cls.BarColor = vbRed
cls.TextColor = vbBlack
cls.TextAlign = BarcodeTextAlign_Center
cls.TextOffset = 2
cls.OutputFolder = "C:\Users\admin\Desktop\barcode"
'make empty folder
If not cls.Initialize Then ReturnEXAMPLE 1
Generate BARCODE Code128 from string ‘autechniques.com’:
cls.Format = BarcodeFormat_QRCode
cls.ErrCorrection = BarcodeCorrection_Auto
Debug.Print cls.Generate("output", "autechniques.com")EXAMPLE 2
Generate 1000 Barcode images starting from ‘123456789’:
cls.Format = BarcodeFormat_Code128
Dim alt_text as string
For i = 1 To 1000
alt_text = CStr(123456789 + i)
cls.Generate alt_text, alt_text
NextSee documentation for other examples.