Di solito faccio così:

Dim dt as DataTable
Dim c As New CrystalReport1
c.Load()
c.SetDataSource(dt)
Me.CrystalReportViewer1.ReportSource = c
Me.CrystalReportViewer1.DataBind()

Apro il report gli associo i dati.
Metto il report nel viewer e faccio il bind dei dati.

Fammi sapere
Ciao
K