Visual Basic - ayuda, que tengo mal

tengo este codigo que es una busqueda por un dato tipo doble, y la hago directo a una consulta de access, que esta agrupada por el mismo dato y obvio el mismo tipo de dato (el campo es folio y tipo doble)
me darían la mano, para saber que tengo mal o de plano en vb no se puede hacer una busqueda de datos tipo doble?, que no creo Gracias.

Private Sub Por_folio()
Dim strTemp as String
Dim nFol1 As Double, nFol2 As Double
'On Error GoTo Por_folioErr

nFol1 = CDbl(Text1.Text) 'capturo el valor a buscar
nFol2 = CDbl(Text2.Text)

'se llama a la consulta de desde access
strTemp = "SELECT * FROM Resumen_ventasxfol "
strTemp = strTemp & "WHERE cuenta "
strTemp = strTemp & "Between '" & nFol1 & "' "
strTemp = strTemp & "AND '" & nFol2 & "'"

'Aqui me indcia que los tipos no coinciden
Set m_adMovtos = g_adConn.Execute(strTemp, , adCmdText)

'si no doy valores a localizar o sea solo la sentencia
'strTemp = "SELECT * FROM Resumen_ventasxfol "
' y extraigo los tipos de datos todos me los da como dobles.
'y ya le busque y le busque.
If m_adMovtos.RecordCount > 0 Then
m_adMovtos.MoveFirst
MsgBox ("Folio Tabla = " & VarType(m_adMovtos.Fields!cuenta))
MsgBox ("Folio Inicial = " & VarType(nFol1))
MsgBox ("Folio Final = " & VarType(nFol2))
Else
MsgBox ("No Existen Movimientos")
Exit Sub
End If

Gracias por su tiempo

ya lo resolví, gracias, creo era solamente exponer mis traumas y darme cuenta que estaba mal en poner a un dato numerico comilla simple en vez de enviarlo tal cual, perdon fue un lampsus.

Moises