Visual Basic - Búsquedas con varios criterios

Hola a todos, necesito ayuda:
tengo un proceso que me busca registros en una tabla Sql de la siguiente forma:

Criterio = " CodigoCliente = ' " & CodCli & " and CodigoRuta = ' " & CodRut & " ' "
Adodc.Recordset.Find Criterio

Pero me da el siguiente error: Argumentos incorrectos, fuera del intervalo permitido o en conflicto con otros.

¿Que estoy haciendo mal?

en efecto lo puse por temas de claridad.
La varible 'Criterio' contendría lo siguiente:

CodigoCliente = '00001' and 'r01'

pero me si dando el error.
Los dos campos (CodigoCliente y CodigoRuta son de tipo String)

INTENTA PONIENDO Adodc.Recordset.MoveFirst ANTES DEL Adodc.Recordset.Find Criterio

Ya lo he intentado y sigo con el problema.
¿Me falta añadir alguna Referencia o Control?

Resulta que en ADO el método Find solo permite un criterio de búsqueda y tengo que utilizar el método "Filter"

Si alguien tiene el mismo problema ya sabe porque

Gracias y un saludo