Visual Basic - urgente, ayuda en consultas

por favor si alguien me puede ayudar con consultas que realizo en visual basic, porque cuando las ejecuto me manda errores, la base de datos la conecte mediante codigo en un modulo, pero la consultas las he intentado hacer con objetos como el data y dbgrid, y no me las acepta, si alguien me puede ayudar, se los agradeceria, si me kieren agregar, [email protected]

¿Podrías poner el código de la conexión y de las consultas?. Quizá podamos ayudarte en algo.
Saludos

Private Sub Label1_Click()
Dim cad As String
cad = "Select * from Recepcion where Nombre like%'" & a & "'"
Data1.RecordSource = cad
End Sub
este es el codigo ke utilizo para hacer la consultas por letras pero no me lo acepta si me pudieras ayudar te lo agradeceria, [email protected]

Inténtalo de alguna de estas formas:
Se supone que a es una variable de tipo cadena que ya le has asignado un valor.
cad = "SELECT * FROM Recepcion WHERE Nombre LIKE '" & a & "*'"
(Selecciona en la tabla Recepcion los registros del campo Nombre que empiecen por el valor de 'a')
cad = "SELECT * FROM Recepcion WHERE Nombre LIKE '*" & a & "'"
(Selecciona los que terminen en el valor de 'a')
cad = "SELECT * FROM Recepcion WHERE Nombre LIKE '*" & a & "*'"
(Selecciona los que contengan el cualquier posición el valor de 'a')
Y después de asignar el recordset a Data1, hazle un Refresh
Saludos

ya lo intente, pero como se lo tengo asignado a un label que se encuentra incrustado en un frame, no le doy clic al label y no sucede absolutamente nada, no se que hacer me esta desesperando, si pudieras agregarme y te explico mas detalladamente.

cad = "Select * from Recepcion where Nombre like '%" & a & "'"

en el mensaje anterior supuse que "a" era una variable, pero me parece que lo que buscas es que te devuelva todos los registros en donde Nombre termina con "a", si es asi proba con esto:
cad = "Select * from Recepcion where Nombre like'%a'"
Si queres que sean todos los que tienen a en algun lado seria:
cad = "Select * from Recepcion where Nombre like'%a%'"