Paxar 6039 Printer User Manual


 
Printing Functions 3-17
Example VB.NET
Import Ultra
Dim fmtC39 As String = "{F,1,A,R,E,200,200," & Chr(34) &
"C39" & Chr(34) & "|" _
& "C,150,49,0,50,8,8,A,L,0,0," & Chr(34) & "M6039" & Chr(34)
& "|" _
& "T,1,22,V,6,1,0,1,1,1,O,C,0,0|" _
& "B,2,20,V,23,2,4,12,100,8,C,0|}"
Dim strScanData As String = "C39"
Dim rPrint As New Print ' Instantiate class
rPrint.Text = fmtC39
rPrint.Byte = "{B,1,N,1|E,0,0,1,1,0,1|"
rPrint.Byte = "1" & Chr(34) & strScanData & Chr(34) & "|"
rPrint.Byte = "2" & Chr(34) & strScanData & Chr(34) & "|}"