Erro com código

Ola colegas estou com um formulario de cadastro onde o mesmo tem uma lista que a medida
que é digitado o numero para cadastro ele vai filtrando, e se o campo de cadastro tiver na lista
ele acusa que já esta cadastrado, porem o código esta dando erro, esse formulario foi retirado
do maestro do avelino ok, veja a imagem abaixo com o erro do código, como arrumar isso ?

Experimente isso..

substitua o parâmetro 1 por -1      ( onde o numero zero (0) é falso....e o numero menos um (-1 ) é verdadeiro.)

Substitua por

If DCount("lic_Numero","tblLicitacao","lic_Numero = " & Me!tx1) = 1 Then