Can't set printer font from VB app

The following code works, except for the Printer.FontName line. I've tried several variations of it, with no success. I want to print using a mono-spaced font for column alignment.

Private Sub Print_Click()
Printer.FontName = "Courier" ' * *this line is the problem * *
Printer.Orientation = 2 ' this sets landscape mode
Printer.Print Car_List.Text ' this prints my string of text
Printer.EndDoc ' sends actual output to paper
End Sub

Am I not using the command properly? (Or maybe the printer or network is overriding the command?) The other stuff works, and I get printed output. I just can't get the columns lined up.

good work URL

Nice site URL