نقل قول نوشته شده توسط shocraneh مشاهده تاپیک 
دیتاستی که با دو تا تیبل پر شده چه طوری به کریستال ارسال کنم 

یه چیزی مثل این کد که البته جواب نمی ده

Dim ds As New DataSet

        query = "select * from table1  where id='" + TextBox1.Text.Trim + "'"

        da = New SqlClient.SqlDataAdapter(query, cn)

        da.Fill(ds, "std1")

        query = "select * from table2"

        da = New SqlClient.SqlDataAdapter(query, cn)

        da.Fill(ds, "std2")

        Dim strReportPath As String = GetCurrentDirectory()

        If strReportPath.Substring(strReportPath.Length - 9) = "bin\Debug" Then

            strReportPath = strReportPath.Substring(0, strReportPath.Length - 10)

        End If

        strReportPath &= "\CrystalReport2.rpt"

        Dim rpt As New CrystalDecisions.CrystalReports.Engine.ReportDocum  ent

        rpt.Load(strReportPath)

        rpt.SetDataSource(ds)

        Form2.CrystalReportViewer1.ReportSource = rpt

        Form2.ShowDialog()
خب اینجا خودت جواب سوال قبلیت رو دادی.
به نظر ایرادی نداره کدت.
مشکلت چیه؟
ممکنه مشکلت مربوط به زمان طراحی باشه. گزارشت رو چه شکلی ساختی، دیتاست گزارشت دقیقا همین دو تا جدول رو داره و با همین فیلدها؟