Visual Basic - Problema con fecha

Me surge un problema al calcular los dias entre dos fechas, resulta que deseo calcular el resultado de los dias existentes entre dos fechas, pero en este caso me doy cuenta que el resultado no es el que deseo, ya que entre por ejemplo desde el dia lunes 7/01/2009 y el domingo 13/01/2009 el calculo me proporciona como resultado 6 dias, pero sin embargo la realidad que preciso es que exprese el resultado real que de lunes a domingo como es el caso existen 7 dias..no 6, es decir saber el resultado de dias pero incluyendo el dia final.
??????????
TOTALDIAS = DateDiff("d", Label1.Caption, Label2.Caption)
Label3.Caption = TOTALDIAS

En este codigo el resultado es 6, preciso como digo que el calculo sea 7, que son los dias reales que existen incluyendo el dia final.

GRACIAS de antemano.-

Hola Antoniol, si tu rango de días es estrictamente semanal, lo único que debes hacer es lo siguiente:

Fechainicial =fechainicial - uno

Me imagino que colocas la fecha inicial en una de la label. has esto:

Label.caption=cdate("01/12/2009) -1 'Esto te llevará a un día anterior

TOTALDIAS = DateDiff("d", Label1.Caption, Label2.Caption)
Label3.Caption = TOTALDIAS

ahora si podrás obtener tus 7 días que deseas.

Puedes usar: Now -1
Puedes usa: date -1
en su defecto: RecordSet!fecha -1

El chiste es regresar un día en operación con fecha.

Saludos Men!