En query iz SQL v VB

Še ena moja ...

Mam en mal bol kompliciran query, sestavljen iz dveh query-ev, torej.

Najprej z enim q.. poizvem neke datume, kjer se mi pojavi en parameter Izbrani_DATUM, potem pa z drugim q.. poizvem še neke številke.

rezultat pa je en q .. ki vsebuje polja iz obeh q .. In v Acces-u mi lepo gor vrže mesiđ vpišeš datum in vse lepo in prav.

Iz VB pa ne znam titega datuma vključit v SQL stavek.

Stavek bi po mojem mugu bit neki takega:

PARAMETERS Izbrani_DATUM DateTime = #30/4/2002#;
SELECT ZASCITNA_SREDSTVA.OPIS_ZASCITNEGA_SREDSTVA, Plan_NabaveŠtevilke.STEVILKA, Sum([Plan_NABAVE_KONČNI]![KRAT_KOLICINA]*[Plan_NabaveŠtevilke]![Kolicina]) AS PREDVIDENA_KOLICINA
FROM (Plan_NABAVE_KONČNI INNER JOIN Plan_NabaveŠtevilke ON (Plan_NABAVE_KONČNI.ID_ZASCITNO_SREDSTVO = Plan_NabaveŠtevilke.ID_ZASCITNO_SREDSTVO) AND (Plan_NABAVE_KONČNI.ID_OSEBE = Plan_NabaveŠtevilke.ID_OSEBE)) INNER JOIN ZASCITNA_SREDSTVA ON Plan_NABAVE_KONČNI.ID_ZASCITNO_SREDSTVO = ZASCITNA_SREDSTVA.ID_ZASCITNO_SREDSTVO
GROUP BY ZASCITNA_SREDSTVA.OPIS_ZASCITNEGA_SREDSTVA, Plan_NabaveŠtevilke.STEVILKA;

in če to vpišeš v q.. pod sql v acces dela brez da kaj sprašuje !

VB da error No value given for one or more reqired parameters.