Visual Basic - Pasar Variables a SQL

Este es mi problema.
Tengo definida una variable la cual contiene el valor del campo CodigoArticulo el cual ha sido introducido y es dicho campo por el cual quiero buscar.

SHAPE {select CodigoArticulo,Descripcion,Familia,Subfamilia from MArticulo where CodigoArticulo = "&a&" Order by Descripcion}AS ParentCMD APPEND ({select CodigoArticulo,NumeroLote,CantEntrada from MLotes Order by NumeroLote } AS b RELATE CodigoArticulo TO CodigoArticulo) AS b

Este código es el que me ha generado la consulta automática Vb en RecordSource y donde "&a&" es la variable que contiene el campo a buscar pero no hay manera de que funcione. Gracias de Antemano

Yo nunca he usado el generador automático de VB y cuando he tenido que hacer eso lo he hecho así: (CodigoArticulo= ' " + a + " ' ) . Esto lo he hecho si CodigoArticulo es de tipo String. Si es de tipo numerico lo he hecho como escribes tú, pero ten cuidado con los espacios en blanco entre & y la variable, ya que si no dejas te da error. Suerte y espero que te funcione