Visual Basic - fechas en visual con SQL

Estoy haciendo una consulta en visual y necesito comparar una fecha de una base de datos con otra (ADO) y no me deja.
Esto es lo que pongo:

Dim dbs As ADODB.Connection
Dim rst As New Recordset
Set dbs = CurrentProject.Connection
perio = (Forms!ORIGEN![FECHA_PERIODO]) 'Esta fecha la coje bien
rst.Open ("select [MAESTRO_HISTO_MES].id, [MAESTRO_HISTO_MES].fin_periodo, sum([MAESTRO_HISTO_MES].total)as tot from [MAESTRO_HISTO_MES] group by id, fin_periodo,total where maestro_histo_mes < " ' & perio & ' " ;"), dbs, , adCmdTable

Se que el problema está en la comparación pero he probado:
< '#perio'# y me da fallo.
Gracias y un saludo

El problema es que el motor SQL toma la fecha en el formato EEUU, o sea mm/dd/yyyy, tenes que tener en cuenta esto. Otra cosa: las fechas deben ir entre cardinales ( #) o sea que tu variable period deberia ir asi:

"where maestro_histo_mes< # " & period & "#"

Supongo que el campo maestro_histo_mes es un formato de fecha y no solo numerico ( ya que su nombre indica solo mes y no fecha...) si fuera asi tenes que usar la funcion Month() .

Saludos!

Sugiero que investigues con respecto a la instrucción "CONVERT"