Visual Basic - Formato FECHAS

Hola, me gustaria que me contestase alguien si sabe resolver la siguiente duda:

Intento hacer el siguiente select
"Select * from Bases _
& " Where Codigo = '" & TxtCodigo.Text & "' " _
& " And FecInicio = #" & Format(TxtFechaI.Text, "mm/dd/yy") & "# "

y me dice que hay un error cerca de #

Podeis ayudarme?

Bueno, no se que motor de base de datos estees utilizando, porque eso afecta en algunas ocaciones la sintaxis del script, pero prueba con esta, ya que es la mas generica, espero te sirva, bye

"Select * from Bases Where Codigo = '" & TxtCodigo.Text & "' And FecInicio = '" & Format(TxtFechaI.Text, "mm/dd/yy") & "' "

Al principio me ocurria lo mismo y me resulto de esta forma(Combiarto la Fecha a numero internamente)
si no te resulta me escribes un mail
Saludo.-
Dim Paso as recorset
dim Base as database

set Paso=Base.openrecorst=("Select * _
&" From Bases _
& " Where Codigo = '" & TxtCodigo.Text & "' " _
& " And FecInicio = " & Format(TxtFechaI.Text, "0")&" _
&" Order By Codigo")