Specifications

Control Codes POSjet

1500 Programmer's Guide

Page 74 Rev N Nov-10

'CHANGE COLOR

Printer.ForeColor = RGB(255, 0, 0)

Printer.Print " Change Due $2.69"

Printer.ForeColor = RGB(0, 0, 0)

Printer.Font.Bold = False

Printer.Print ""

Printer.EndDoc

Printing via a printer driver (System/Graphical/TrueType Font)

This is the preferred way to print via a Windows printer driver to a page printer.

'SELECT OUR PRINTER BY NAME

For Each x In Printers

If x.DeviceName Like "Series 1500" Then

Set Printer = x

Exit For

End If

'SET FONT SIZE

Printer.FontSize = 10

'SELECT FONT BY NAME

Printer.FontName = "Arial Black"

Printer.CurrentX = 1000

Printer.Print "20 Bomax Rd"

Printer.CurrentX = 800

Printer.Print "Ithaca, NY 14850"

Printer.Print ""

'SELECT FONT BY NAME

Printer.FontName = "Arial"

'SELECT BOLD PRINT

Printer.Font.Bold = True