Printing Code128 barcode using printer object in vb6 (using font) -
we have ancient vb6 program creates barcode using printer objects relies on window fonts, works fine code39. need switch font code128, after work converted input code128 format string, , trying print using same method, however, printout not seem right (strange thing is, when copy converted string excel , use same code 128 font print out, display , print out prefectly)
i wondering if had same experience, if so, can shred lights please?
the following code used print out barcode
dim sorg string sorg = "12345888"  printer.fontname = "code39" printer.print sorg    'this prints out  'however when change font code 'this returns   Í,bzx}Î   can copy onto excel , print out sorg = convertto128(sorg)    printer.fontname = "code 128" printer.print sorg     'print out part barcode line, part squares       
you may use following project includes vb6 project , open barcode font
Comments
Post a Comment