Crystal Report - crystal report muuuuuy lento

Hola a todos, alguien me puede ayudar? se los agradezco
Tengo un reporte que tarda mucho en cargarse la info en crystalReportViewer ya que son muchos registros, entonces quiero saber como poner un mensajito de "Espere unos instantes" ó hacer que se cargue mas rapido el reporte. Aca les paso el codigo que uso

Dim dataset1 As New ArtefactosDataSet ' este es el datasource
' aca lleno los datable que usa el reporte para mostrar la info
Me.ResumenComprasYVentasTableAdapter.Fill(dataset1.ResumenComprasYVentas, dtpfechaDesde.Value.Date, dtpfechaHasta.Value.Date)
Me.FacturasXArtTableAdapter.FillBy(dataset1.FacturasXArt, dtpfechaDesde.Value.Date, dtpfechaHasta.Value.Date)


crDocument.FileName = ".reporte.rpt"

crDocument.SetDataSource(dataset1)

freportes.crview.ReportSource = crDocument

freportes.Show()


muchas gracias, mónica