Vous pouvez construire une base de question comme ceci :
sSql = myFields CHOISIS des myTables OÙ 1=1
Et maintenant, variables d'utilisation pour le reste des paramètres :
si (pas isNull (combo1.Value)) puis
sConditions = sConditions et « ET fieldCombo1 = » et combo1.Value
finir si
si (pas isNull (combo2.Value)) puis
sConditions = sConditions et « ET fieldCombo2 = » et combo2.Value
Finir si
Enfin vous ajoutez seulement vos conditions à votre question originale
sSql = sSql et sConditions
Et exécuter cette question de sSql.