Filter
Top Products
CITIZEN OPOS DRIVER 1.8 Application Development Guide
46
+ Chr$(&H33) + Chr$(&H33) _
+ Chr$(&H30) + Chr$(&H3D) _
+ Chr$(&H30) + Chr$(&H3A) _
+ Chr$(&H34) + Chr$(&H31) _
+ Chr$(&H34) + Chr$(&H32) _
+ Chr$(&H34) + Chr$(&H33) _
+ Chr$(&H30) + Chr$(&H3D) _
+ Chr$(&H30) + Chr$(&H3A)
result = OPOSPrinter.PrintNormal(PrintStation, pString)
・ OPOS_BC_DECIMAL
Each byte is converted to three characters. Val (String) is used by three characters each in
order to convert ASCII to binary. To create three ASCII characters from each byte,
Right("^^"+Str(Byte),3) is used in the following installation example, where "^" indicates a
space.
Dim pString As String
Dim result As Long
Dim PrintStation As Long
OPOSPrinter.BinaryConversion = OPOS_BC_DECIMAL
pString = Right(Str(68), 3) _
+ Right(Str (101), 3) _
+ Right(Str (99), 3) _
+ Right(Str (105), 3) _
+ Right(Str (109), 3) _
+ Right(Str (97), 3) _
+ Right(Str (108), 3) _
+ Right(Str (13), 3) _
+ Right(Str (10), 3) _
+ Right("^^" + str(49), 3) _
+ Right("^^" + str(50), 3) _
+ Right("^^" + str(51), 3) _
+ Right("^^" + str(13), 3) _
+ Right("^^" + str(10), 3) _
+ Right(Str (65), 3) _
+ Right(Str (66), 3) _
+ Right(Str (67), 3) _
+ Right(Str (13), 3) _
+ Right(Str (10), 3)
result = OPOSPrinter.PrintNormal(PrintStation, pString)
Every printing results in the following.
(Printing order: OPOS_BC_None, OPOS_BC_Nibble, OPOS_BC_Decimal)
None
123
ABC
Nibble
123
ABC
Decimal
123
ABC