I want to direct print on printer without viewing then print.
RPTfrmCashReport.CrystalReportViewer1.ReportSource = CashReceipt
RPTfrmCashReport.CrystalReportViewer1.SelectionFormula = "{Invoice_Master.Invoice_no} = '" & LblInvoiceno.Text & "'" Dim report As New CrystalDecisions.CrystalReports.Engine.ReportDocument