dataenviroment con filtro

Adrian moreno
07 de Marzo del 2006
Buenas tardes a todos
Mi inconveniente es el siguiente tengo dataenviroment y a este le tengo que filtrar por un campo "departamento" y de alli pasarlo al data report filtrado si alguien me suguiere un codigo se los agradezco mi codogo es este
Dim Filtro As String
Filtro = Trim$(Str$(Val(Text2.Text)))
dtacliente.rscontacto.Filter = "departamento=" + Filtro
DataGrid1.Refresh
clidpto.Show
donde clidpto es el data report pero no funciona

Muchas Gracias