Crystal Report - no visualizar ventana pidiendo parametros

Hola gente, tengo un formulario (en visual studio 2005 y crystal report 11) que llama a un reporte donde le paso una fecha de parametro y lo muestra bien el tema es que abre una ventana pidiendo los paramtros de nuevo y nose como hacer para que no se muestre.
EL codigo que utlizo es :

Me.Cursor = Cursors.WaitCursor
Dim dataset As New coopDataSet
Dim unafecha As Date = DateTimePicker1.Value

Me.LotesTableAdapter.Fill(dataset.Lotes)

Dim reporte As New CrystalReport
reporte.FileName = "..\..\crystalreport.rpt"

reporte.RecordSelectionFormula = "{Lotes.fechaProxVerif}= Date(" & unafecha.Year & "," & unafecha.Month & "," & unafecha.Day & ")"

reporte.SetDataSource(dataset)
freportes.CrystalReportViewer1.ReportSource = reporte
Me.Cursor = Cursors.Default
freportes.Show()

gracias,

Me suena que el erro puede ser que el nombre del parametro creado en el report no es igual al que el eenvias desde visual basic

Este es un ejemplo de como Ejecuto un report

Dim reportes As New RepoConsulCompras
Dim visor As New frmViewer
sql = "SELECT factura,fecha,registro,comprob,total,actualizado FROM compras_e where month(fecha)='" & xmes & "' and year(fecha)='" & xaxo & "'"

LlenarDSet(sql, "compras_e", ds_cons)
reportes.SetDataSource(ds_cons)
reportes.SetParameterValue("MesRepo", meslet)
reportes.SetParameterValue("musuario", nom_usuario)
visor.Viewer.ReportSource = reportes
visor.Show()

Si ves el las lines de Parameter mando 2 valores el primero es el nombre del paraametro en el report y el otro es el dato que envio de parametro

Si el nombre que envio aqui es diferente pues a ejecturalo me activa la ventana para pedirme el parametro

Espero haberte ayudado

Muchisimass graciass, y sii esa es la solucion o casi parecida me quedo, segui investigando y llegue jje, algo pocos dicen es que hay que agregar a la aplicacion un ReportDocument , a este se le asigna el report y es el que pasa los parametros y un CrytalReportViewer para visualizar, me quedo de la sgte forma :
(Por si le sirve a alguien mas :D )

Dim dataset As New ArtefactosDataSet
Me.RotacionArticulosPorRubroSubrubroTableAdapter.Fill (dataset.RotacionArticulosPorRubroSubrubro)
crdocument.FileName = "crystalreport1.rpt"
crdocument.SetDataSource(dataset)
crdocument.SetParameterValue(0, Me.DateTimePicker1.Value)
crdocument.SetParameterValue(1, Me.DateTimePicker2.Value)
crdocument.SetParameterValue(2, Me.tbsaldoAnterior.Text)
crdocument.SetParameterValue(3, Me.tbsaldoActual.Text)
freportes.CrystalReportViewer1.ReportSource = crdocument