Você pode construir uma base da pergunta como esta:
sSql = myFields SELETOS dos myTables ONDE 1=1
E agora, variáveis do uso para o descanso dos parâmetros:
se (não isNull (combo1.Value)) então
sConditions = sConditions & “E fieldCombo1 =” & combo1.Value
terminar se
se (não isNull (combo2.Value)) então
sConditions = sConditions & “E fieldCombo2 =” & combo2.Value
Terminar se
Finalmente você adiciona somente suas circunstâncias a sua pergunta original
sSql = sSql & sConditions
E executar esta pergunta do sSql.