Visual Basic - DUDA EN CONSULTA SQL URGENTE PLEASE

Hola colega, se me ha presentado el siguiente problema al elaborar mi instrucción sql para realizar una consulta. Actualmente poseo la siguiente consulta la cual cumple ciertos parámetros y la realiza perfectamente:
FEC1 = Format(CDate(MKBfec1.Text), "mm/dd/yyyy")
FEC2 = Format(CDate(MKBfec2.Text), "mm/dd/yyyy")
SQL = "SELECT nacionalidad,cedula1,priape,segape,prinom,segnom,obj1,fecnac FROM CEOBJ WHERE lote between #" & FEC1 & "# AND #" & FEC2 & "# AND OBJ1 = " & TXTobj1 & " AND CODDES = " & TXTcoddes & ""

Pero ahora me es necesario hacerlo de la siguiente manera y no me funciona:
FEC1 = Format(CDate(MKBfec1.Text), "mm/dd/yyyy")
FEC2 = Format(CDate(MKBfec2.Text), "mm/dd/yyyy")
FEC3 = Format(CDate(MKBfec3.Text), "mm/dd/yyyy")
FEC4 = Format(CDate(MKBfec4.Text), "mm/dd/yyyy")
SQL = "SELECT nacionalidad,cedula1,priape,segape,prinom,segnom,obj1,fecnac FROM CEOBJ WHERE lote between #" & FEC1 & "# AND #" & FEC2 & "# AND OBJ1 = " & TXTobj1 & " AND CODDES = " & TXTcoddes & " AND fecdes between #" & FEC3 & "# AND #" & FEC4 & "#"

No me muestra ningun mensaje de error, sino que no me refleja ningun resultado en la consulta. Mi base de datos esta elaborada en access. Me gustaria saber tambien como puedo hacer en el caso de que la consulta sea nada mas de una fecha por ejemplo de FEC1 sin la necesidad de utilizar el between ya que he utilizado varias maneras y no me ha dado resultados... Agradezco de antemano la ayuda posible amigo

Intenta de la siguiente forma
1.- Separa el dia , mes y año
Dia1 = FechaIni.Day
Dia2 = FechaFin.Day
Mes1 = FechaIni.Month
Mes2 = FechaFin.Month
Ano1 = FechaIni.Year
Ano2 = FechaFin.Year
2.- Selecciona tu informacion
SQL = "Select * From Tabla Where " & _
"(Day(Tabla.fecha_ini) = " & Dia1 & _
" and Month(Tabla.fecha_ini) = " & Mes1 & _
" and Year(Tabla.fecha_ini) = " & Ano1 & ")" & _
" and (Day(Tabla.fecha_fin) = " & Dia2 & _
" and Month(Tabla.fecha_fin) = " & Mes2 & _
" and Year(Tabla.fecha_fin) = " & Ano2 & ")"
Espero que te sirva ...