Código:
 SQL=select fecha from tabla where fecha='la-fecha-que-buscas'
ResultadoSQL = procedimiento(SQL)
dim fecha1, fecha2 as date
dim dias as integer
fecha1 = ResultadoSQL
fecha2 = fecha1 + day(day(fecha1) + dias)
  aca de dejo un tutorial sobre el procedimiento 
enlazar una base de datos.
primero ve que tal de va con eso.
y aca tienes una 
funcioncilla que te dejo para que tu la adaptes a gusto, devuelve cuanto tiempo hay entre dos fechas, algo asi:  
Código:
 tiempo = tiempoEntreFechas(fecha1, fecha2)
  y que te vaya bien, ahi nos cuentas.