Visual Basic - Ayuda Con Consulta

Quiero hacer una consulta para verificar si el codigo existe en una Base De Datos de access y al hacer la consulta me marca los siguientes mansajes el campo codigo es numerico entero de 5 digitos:
Si le pongo esto:
Set Rs = Cn.Execute("Select NombreClie From Clientes Where CodigoClie = " & TxtNumero.Text & " ', ")
Marca "Error en la cadena de sintaxis en la expresion de consulta 'CodigoClie=00000','

Si le pongo esto:
Set Rs = Cn.Execute("Select NombreClie From Clientes Where CodigoClie = " & TxtNumero.Text & " ', ")
Marca "Error en sintaxis (coma)en la expresion de consulta 'CodigoClie=00000,'

Si le pongo esto:
Set Rs = Cn.Execute("Select NombreClie From Clientes Where CodigoClie = ' " & TxtNumero.Text & " ', ")
Marca "Error en la cadena de sintaxis en la expresion de consulta 'CodigoClie=00000,'

Como pueden ver lo que varia son los signos del la ultima parte de la consulta.Lo extraño es que si la base de datos en campo lo pongo como texto no me marca nada y si hace bien la consulta pero lo que quiero es que sea el campo numerico no texto .Si me podrian ayudar .
Gracias .Saludos.

HOLA:

mira lo que estas haciendo es igualar tu campo codigocli con un string, lo que tienes que hacer es transformar tu string que en este caso seria txtnumero.text, creo que la funcion es Cint(txtnumero.text).

saludos

dansan

No se si se pueda usar esa funcion ya que el valor que recibe es con formato "000000" , esto es que si le pongo 1 y presiono enter se convierte en "000001" y de ahi realiza la busqueda no se si me explico y si me puedan ayudar ya que lo intente como lo dijiste.

¿Has probado a quitar lel final de la consulta? & " ', " Puede que por estos signos se produzca el error. No se si sabras que en las comparaciones los números van sin comillas.
Espero que te sirva.