Visual Basic - imprimir report

HOLA TENGO EL SIGUIENTE INFORME QUE LLAMO DESDE VISUAL BASIC Y LO VEO SIN PROBLEMA EL PROBLEMA ES QUE QUIERO IMPRIMIR DIRECTAMENTE DESDE VISUAL CUANDO PONGO CRViewer.PrintReport POR EL ViewReport SE ME QUEDA COLGAO alguien sabria como puedo solucionarlo

Set CrxReport = crxApplication.OpenReport(App.path & "\Informes\" & "clientes.rpt", 1)
'Pasarle la localizacion de la DB

CrxReport.Database.Tables.Item(1).Location = VariableGlobal
CrxReport.RecordSelectionFormula = "{Clientes.NomFiscal}>='" & ClientesImpresion.Text3 & "' and {Clientes.NomFiscal} <='" & ClientesImpresion.Text4 & "'"
CrxReport.RecordSelectionFormula = "{Clientes.CodCliente}>=" & ClientesImpresion.Text1 & " and {Clientes.CodCliente} <=" & ClientesImpresion.Text2


Set CrxFFD = CrxReport.FormulaFields

CRViewer.ReportSource = CrxReport
CRViewer.ViewReport
CRViewer.Zoom 100

CRViewer.Refresh

gracias por la ayuda