Impresion de Crystal Report Directamente a la Impresora

reportDocument1.Load("C:\Inventory and Sales System\Inventory Control and Sales System\Inventory Control and Sales System\Inventory Control and Sales System\CrystalReport_TicketSaleInvoice.rpt")

CrystalReportViewer_TicketInvoice.SelectionFormula = "{DETALLE_VENTA_ARTICULOS.FacturaNo}='" & cboInvoiceNo.Text & "'"

LBL_Status.Visible = True
ReportDocument1.PrintToPrinter(1, False, 0, 0)