prova così:
codice:
mioFiltro = "tbscadenzario.datascadenza between '" & CDate & "(DTPDal.Value) & "' AND '" & CDate(DTPAl.Value) & "'"
NB: nota gli apicini