Pasar Los Valores de un textbox a un Reporte en visual basic

[valderramalex]

ejecutaradapter("Select PORCENTAJE,ASISTENTES,EN_SALA from informes Where ID = '1' ")
porcentaje1 = dataset.Tables(0).Rows(0)(0).ToString
asistentes = dataset.Tables(0).Rows(0)(1).ToString
ensala = dataset.Tables(0).Rows(0)(2).ToString

End Sub

Private Sub ReportViewer1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ReportViewer1.Load
Try
Me.ReportViewer1.SetDisplayMode(DisplayMode.PrintL ayout)
Me.ReportViewer1.ZoomMode = ZoomMode.Percent
Me.ReportViewer1.ZoomPercent = 25
Dim parameters As New List(Of ReportParameter)()
parameters.Add(New ReportParameter("@ReportParameter1 ", porcentaje1))
parameters.Add(New ReportParameter("ReportParameter2 ", asistentes))
parameters.Add(New ReportParameter("ReportParameter3 ", ensala))
Me.ReportViewer1.LocalReport.SetParameters(paramet ers)
Me.ReportViewer1.RefreshReport()
Catch ex As Exception
MsgBox(ex.Message.ToString)
End Try

genere este codigo para hacer lo del llenado del reporviewer no se en donde esta el error si me pudiesen ayuda muchas gracias