VB.net Error al cargar SQL

[jmoraga]

Hola gente, estoy trabajando con VB.net 2008 y MsSQL 2005. Tengo una consulta que cuando la corro en el SQL me refleja datos y exactamente la misma consulta la ejecuto en un form de vb y me sale en blanco. Que podrá ser?? Adjunto la consulta:
********
SELECT DISTINCT [Fecha],[Cliente],[Cod_Int_PDV]
FROM [Almacen].[dbo].[Almacen]
WHERE [Cod_Cadena] = '1'
AND
[Almacen].[Fecha] >= '20090201'
AND
[Almacen].[Fecha] <= '20090304'
********
Si yo a esa consulta le quito el DISTINCT si funciona sin problema. Yo estoy seguro que esa consulta tiene que tirarme 26 rows y de hecho así lo hace pero solo en MsSQL pero en el FORM nop. Yo me conecto al SQL con ADODB, inclusive si lo hago por ADO.net si me carga exactamente la misma consulta. Pero yo necesito cargarlo por medio de ADOBD. Gracias por la ayuda.