Usare questo metodo per cancellare tra date va bene?

E secondo voi come mai non funziona, mi dice:

Tipi di dati non corrispondenti nell'espressione di criterio

codice:
    Rs.Open "Delete * From Report where DtDoc Between _
 '" & xpCalendario1.Value & "' and '" & xpCalendario2.Value & "'", Cn, 3, 3