Are you doing it specifically for your own print run? If so it would be:
VB Code:
  1. Me.PrintDocument1.PrinterSettings.DefaultPageSettings.Landscape = True