Visual Basic - Conflicto en lectura de fechas con SQL

Saludos a tod@s.

Tengo en un programa la siguiente rutina:

Dim Fecha as Date
... más instrucciones
If IsDate(txt_Fecha.Text) = True Then
Fecha = txt_Fecha.Text
End If
Num_Sesión = "select * from Sesión where Fecha=#" & Fecha & "#"
Set rsSesión = Acceso.OpenRecordset(Num_Sesión)

todo funcionaba muy bien, sin embargo, hoy comenzó a enviar un error de sintaxis en la instrucción select y no se a que se deba

¿Alguien puede auxiliarme?

Gracias

Supongo que hablarás de access.
Todo funcionaba "bien" hata el día 12 (mira si las fechas anteriores no ha confundido el mes con el día)
Prueba así: "#" & Format(Fecha, "mm/dd/yy") & "#"
Y si es sql server asi: "'" & Format(Fecha, "yy,mm,dd") & "'"

Perdón, si es sqlserver no pongs comas, pon tambien barras "yy/mm/dd")

Gracias