U kunt een vraagbasis als dit construeren:
sSql = SELECTEER myFields UIT myTables WAAR 1=1
En nu, gebruiksvariabelen voor de rest parameters:
als (niet isNull (combo1.Value)) dan
sConditions = sConditions & „EN fieldCombo1 =“ & combo1.Value
beëindig als
als (niet isNull (combo2.Value)) dan
sConditions = sConditions & „EN fieldCombo2 =“ & combo2.Value
Eind als
Tot slot voegt u slechts uw voorwaarden aan uw originele vraag toe
sSql = sSql & sConditions
En voer deze sSqlvraag uit.