مشکل در نمایش اطلاعات

من یه گزارش با crystal report 11 درست کردم وقتی این گزارشو تو vb.net 2003 نمایش میدم مشکلی نداره ولی وقتی به جستجو انجام میدم و جواب جستجو مثلاً 1 رکورده باز همه ی رکوردها رو تو crystal report viewer نمایش میده کسی میدونه مشکل از کجاست
ضمناً من از این کد استفاده میکنم

نقل قول:

---

Dim s As String
SqlConnection1.Open()
s = "select * from Dastgah where num = '" + TextBox1.Text + "' "
SqlDataAdapter1 = New System.Data.SqlClient.SqlDataAdapter(s,SqlConnecti on1)
DataSet21.Clear()

SqlDataAdapter1.Fill(DataSet21, "Dastgah")

SqlConnection1.Close()

CrystalReportViewer1.Refresh()
myreport.Close()
If DataSet21.Tables("Dastgah").Rows.Count <> 0 Then
myreport.Database.Tables("Dastgah").SetDataSource( DataSet21.Tables("Dastgah"))
CrystalReportViewer1.ReportSource = myreport
CrystalReportViewer1.Refresh()

End If

---