Я использую следующий код
Dim PrintR_ As Printing.PrinterSettings = ReportViewer1.PrinterSettings
PrintR_.PrinterName = "Microsoft XPS Document Writer"
ReportViewer1.PrintDialog(PrintR_)
Однако при выполнении появляется следующая форма 
Все, что я хочу - не видеть этот экрани печатать напрямую на основе конкретного имени принтера
Спасибо всем, кто помогает.