Visual Basic - Calcular fecha

Hola, necesito a partir de un dia cualquiera dado por un datepicker que me diga cual es el primer dia de esa semana y el ultimo.
Saludos

Puedes hacer:

Para el primer día, si consideras que empieza un domingo:

Date-(WeekDay(Date)-vbSunday)

Para el último día, si consideras que termina un sábado:

Date+(vbSaturday-WeekDay(Date))

Muchisimas gracias

Hola, el del ultimo día de la semana no me funciona bien, considero siempre que el primer dia de la semana es el lunes y el ultimo el domingo, pero si abajo le pongo Date+(vbSunday-WeekDay(Date)) me dice el domingo anterior.
Un saludo

Puedes hacer:

Para el primer día, si consideras que empieza un domingo:

Date-(WeekDay(Date)-vbSunday)

Para el último día, si consideras que termina un sábado:

Date+(vbSaturday-WeekDay(Date))