Consulta según checkbox activo
como debería hacer una consulta si tengo en un formulario 5 checkbox y puede estar cualquiera tildado o no, teniendo diferentes criterios en cada check osea que en cada uno hago un inputbox para que el usuario coloque lo que busca de cada campo. Ejemplo
cad = InputBox("Ingrese Nombre", "Ingreso de Datos")
cad = "*" & cad & "*"
Qry = "SELECT * FROM Maestro_Activas WHERE (((Maestro_Activas.es_nombre) LIKE ' " & cad & " '))"
Data1.RecordSource = Qry1
Data1.Refresh
Si hago combinaciones serian muchas consultas ejemplo
si 1 y 0 y 0 y 0 y 0
si 1 y 1 y 0 y 0 y 0
y así sucesivamente
Gracias