Me.DataTable1TableAdapter.Fill(Me.Sales.DataTable1, "F_Date", "T_Date") Me.ReportViewer1.LocalReport.SetParameters(rp) Me.ReportViewer1.RefreshReport() ****** Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Try Me.DataTable1TableAdapter.Fill(Me.Sales.DataTable1, TextBox1.ToString, TextBox2.ToString) Me.ReportViewer1.RefreshReport() Catch ex As Exception System.Windows.Forms.MessageBox.Show(ex.Message) End Try End Sub