Filter
Top Products
Sample Applications A-19
'************************************************************
'* Code 39 Barcodes
'************************************************************
Dim C39 As New Ultra.Scan.Code39
C39.Enable = True ' Enable Code 39
C39.FullASCII = True ' Enable Full Ascii
C39.XmitCD = True ' Xmit C/D
C39.VerifyCD = False ' Don't Verify C/Ds
C39.Trioptic = False ' Disable Triopic Code 39
C39.Code32Prefix = False ' No CODE32 prefix
C39.XlateToCode32 = False ' Don't Convert to CODE32
C39.FixedLength = False ' Variable Length Enabled
C39.Length1 = 2 ' Variable Length1 = 2
C39.Length2 = 55 ' Variable Length2 = 55
'************************************************************
'* Code 128 Barcodes
'************************************************************
Dim C128 As New Ultra.Scan.Code128
C128.Enable = True ' Enable Code 128
C128.UCCEAN128 = True ' Enable UCCEAN128
C128.ISBT128 = True ' Enable ISBT128
'************************************************************
'* Interleaved 2 of 5 Barcodes
'************************************************************
Dim I2OF5 As New Ultra.Scan.I2of5
I2OF5.Enable = True ' Enable I 2of5 Symbology
I2OF5.VerifyCD = False ' Don't Verify C/Ds
I2OF5.XmitCD = False ' Don't Xmit C/Ds
I2OF5.FixedLength = False ' Variable Length Enabled
I2OF5.Length1 = 2 ' Variable Length1 = 2
I2OF5.Length2 = 22 ' Variable Length2 = 22
'************************************************************
'* Discrete 2 of 5 Barcodes
'************************************************************
Dim D2OF5 As New Ultra.Scan.D2of5
D2OF5.Enable = True ' Enable D 2of 5
D2OF5.FixedLength = False ' Variable Length Enabled
D2OF5.Length1 = 2 ' Variable Length1 = 2
D2OF5.Length2 = 22 ' Variable Length2 = 22