textbox1の名前でフィルタリングするレポートを読み込もうとしていますが、「このレポートで定義されていないレポートパラメータ「Name」を設定しようとしました」というエラーが表示されます。
Dim ds As New TestDataSetTableAdapters.tblTestDataTableAdapter 
        ' Create report data source 
        Dim ID As ReportParameter 
        ID = New ReportParameter("Name", TextBox1.Text) 
        Dim rds As New ReportDataSource("MyApplication_ModelObject", ObjectDataSource1) 
        ' Clear the datasets in the report viewer and add the new datasource 
        ReportViewer1.LocalReport.DataSources.Clear() 
        ReportViewer1.LocalReport.DataSources.Add(rds) 
        ReportViewer1.LocalReport.SetParameters(ID) 
        ReportViewer1.LocalReport.Refresh()