Visual Basic - Cadena SELECT

Hola.
Quiero hacer una seleccion de registros de una tabla en access y meterlos en un grid.
Pongo lo siguiente:

sql = "SELECT * FROM TCli WHERE Codigo Tipo Cliente = '" & tcf.Text & "'"


rs.Open sql, cnn, adOpenStatic, adLockOptimistic
With DataGrid1
.AllowUpdate = False
End With

Call CargarDataGrid(DataGrid1)

Si no utilizo la clausula WHERE me salen todos los reguistros, el problema es del where.

Codigo Tipo Cliente es un campo de tabla access tipo texto.
tcf.Text CAMPO TIPO COMBOBOX
Error de sintaxis(falta operador) en la expresion.

NOTA. SI QUITO EL WHERE FUNCIONA CORRECTAMENTE, LO MALO ES QUE SALEN TODOS LOS CLIENTES.

GRACIAS CORRIJOTODO.

sin where funciona y con where no


MUY SIEMPLE !!!!!!





NO HAY ELEMENTOS QUE MOSTRAR

si es simple dime como hacerlo

EL VALOR QUE LE ESTAS PASANDO NO EXISTE EN TU BASE DE DATOS.


DEPURA Y REVISA QUE VALOR ESTA TOMANDO DE TU TEXTBOX, O APLICALE UN TRIM().

Yo creo que la validacion o la variable que usas en el where la deberias asignar a una variable valga la redundancia y no manejarla desde la caja de texto para que le hagas un trim y no te tome espacios vacios al inicio o final y ademas convertirlo a mayusculas o minusculas segun tengas los datos porque como estas manejando string quizas no sea facil y por eso el Query no te esta regresando datos cuando pones el Where.

Saludos ojala que esto te ayude a encontrar la falla

Yo creo que la validacion o la variable que usas en el where la deberias asignar a una variable valga la redundancia y no manejarla desde la caja de texto para que le hagas un trim y no te tome espacios vacios al inicio o final y ademas convertirlo a mayusculas o minusculas segun tengas los datos porque como estas manejando string quizas no sea facil y por eso el Query no te esta regresando datos cuando pones el Where.

¿Acaso sabes lo que estás respondiendo?

XD:

Pues para que no falten opiniones ahí va la mia.
El nombre del Campo es muy complejo, cambialo a CodigoTipoCliente sin espacios o con guiones bajos, lo mismo resulta.

Pues ahí también va la mia.

No tiene que cambiar nada, sólo poner el nombre del campo entre corchetes.

[Codigo Tipo Cliente] = a lo que sea

Pon tu select de esta forma

"SELECT * FROM TCli WHERE Codigo Tipo Cliente = ' " + Trim(tcf.Text) + " ' "

Espero te sirva

Después de todo lo que se ha dicho aquí, sales tu con esa ocurrencia

La instrucción correcta es:
sql = "SELECT * FROM TCli WHERE [Codigo Tipo Cliente] = '" & tcf.Text & "'"