CAN'T GET VBPRPSTABLOID TO PRINT ON 11X17" PAPER??

[Hiccup]

I'm trying to get my VB6 Report to print out on 11X17" landscaped paper, but it's printing on 8-1/2X11" landscaped paper. Here's the code I'm using for the print operation when the cmdButton is clicked:

Private Sub cmdPrintRecords_Click()

Printer.FontName = "New Times Roman"
Printer.FontSize = 16
Printer.FontBold = True
Printer.Orientation = 2
Printer.PaperSize = vbPRPSTabloid
Printer.Print: Printer.Print
Printer.Print vbNewLine & Space(61) & "(Report Title)"
Printer.FontSize = 10
Printer.Print Space(128) & Format(Date)
Printer.Print: Printer.Print
Printer.EndDoc

End Sub

Can anyone tell me what I'm doing wrong? Maybe I've got the code "Printer.PaperSize = vbPRPSTabloid" in the wrong location??

Also, it's not printing out in "New Times Roman" font; any suggestions here as well?

Thanks in advance!