prova a fare tutto da codice
codice:
dim sql as string
sql = "SELECT Case.Codice, Case.Tipo, Case.Zona, Case.Indirizzo, Case.Metri, Case.Camere, Case.Descrizione FROM [Case] WHERE true "
if CasellaCombinata12<>"" and not isnull(CasellaCombinata12) then
       sql = sql & " and Case.Tipo=CasellaCombinata12 "
end if
if Testo1<>"" and not isnull(Testo1) then
       sql = sql & " and Case.Metri)>=Testo1 "
end if
if Testo20 <>"" and not isnull(Testo20) then
       sql = sql & " and Case.Camere)>=Testo20 "
end if
sql = sql & ";"
me.recordsource = sql