Consulta con Fechas entre Vb6 y SQLserver

[DrakenRG]

Una pregunta sobre el manejo de las consultas entre Vb6 y SQL.
El codigo en SQL es el siguiente:
DECLARE @fecha1 DATETIME, @fecha2 DATETIME
set @fecha2 = CONVERT(CHAR(8), GETDATE(), 112)
set @fecha1 = SELECT DATEADD(Y, -1, @fecha2)
SELECT CONVERT(char(10),VenDet.FechaVenta,101) AS fecha,
Farmacias.Cod_Farma AS Sucursal,
ListProdVenDiaria.CodigoInterno AS CodigoInterno,
CatProductos.Descripcion AS Descripcion,
SUM(VenDet.Cant_Vend) AS Cantidad
FROM VenDet
INNER JOIN ListProdVenDiaria
ON VenDet.CodigoInt = ListProdVenDiaria.CodigoInterno
INNER JOIN Farmacias
ON VenDet.Renglon = Farmacias.Cod_Farma
INNER JOIN CatProductos
ON ListProdVenDiaria.CodigoInterno = CatProductos.Codigo
WHERE VenDet.FechaVenta >= @fecha1
AND VenDet.FechaVenta < @fecha2
GROUP BY convert(char(10),VenDet.FechaVenta,101),
Farmacias.Cod_Farma,
ListProdVenDiaria.CodigoInterno,
CatProductos.Descripcion
ORDER BY fecha, Sucursal, CodigoInterno, Descripcion, Cantidad

Mi duda es como paso las fechas de visual basic 6 a la consulta de SQL , estoy utilizando una conexion a SQL mediante codigo , ya la informacion se visualiza en un DataGrid.

AGradecido de antemano por su tiempo , les mando un Saludo
que tengan un excelente fin de semana.