Paxar 6039 Printer User Manual


 
Printing Functions 3-15
Example VB.NET
Import Ultra
Dim rPrint As New Ultra.Print
rPrint.Text = "{F,4,A,R,E,200,200,""Japan""|"
rPrint.Text = "C,50,0,0,139,2,2,B,L,0,0,"""
rPrint.TextDoubleByte = ChrW(&H82C6) & ChrW(&H82C6) &
ChrW(&H82BD) & ChrW(&H82DE)
rPrint.Text = """|}"
rPrint.Text = "{B,4,N,1|E,0,0,1,1,0,1|}"