Visual Basic - DTPicker

Como pudo comparar fechas con dada con un DTPicker y la encontrada en una base de datos

Gracias

if DTPicker1.Value=recordset("fecha") then

<fin de texto>

Pero yo lo quiero hacerlo en una instruccion sql por que estoy usando el Adodc y el resultado imprimirlo en un DataGrid
como para mostrar un Historial entre 2 fechas

adodc.recordsource="select * from tabla where fecha between #" & dtpicker1.value & "# and #" dtpicker2.value "#"
adodc.refresh
set datagrid.datasource=adodc
datagrid.refresh