dudas con crystal reports

[emmax]

Private Sub frm_reporte_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim conexion As String = "string de conexion"
Dim sqlcon As New SqlConnection(conexion)
sqlcon.Open()
Dim da As SqlDataAdapter
Dim dt As DataTable
da = New SqlDataAdapter("aqui tu Query", sqlcon)
dt = New DataTable
da.Fill(dt)
sqlcon.Close()
Dim CrReport As New CrystalDecisions.CrystalReports.Engine.ReportDocum ent
CrReport = New CrystalDecisions.CrystalReports.Engine.ReportDocum ent()
CrReport.Load("ruta del tu reporte junto con el nombre del reporte \*.rpt")
CrReport.SetDataSource(dt)
CrystalReportViewer1.ReportSource = CrReport
End Sub

Este es el sub que uso para cargar el reporte, solo adapta los comandos SQL a OLEDB y te debe de funcionar, tambien yo tengo el ReportViewer en un Form aparte y al reporte le debes de agregar un datatable con los campo del select que tengas para que te agregue los datos

como te digo el ReportViewer lo tengo en un form y este sub lo pongo en el load del form.