Returnera datum efter val av månad

:)

Hur gör jag för att returnera start- och slutdatum för en viss månad?

Tänkte ha två listmenyer där år och månad väljs.

Exempel:
2005, Maj

Skall returnera
startDate: 2005-05-01
stopDate:2005-05-31

Mvh
Henrik

För att skapa ett datum använder du dateserial:

datFirst = DateSerial(lngYear, lngMonth, 1)

För att få reda på sista dagen i månaden så lägger du på en månad och drar ifrån en dag:

datLast = DateAdd("d", -1, DateAdd("m", 1, datFirst))

:e

Tack för det!!!!

Mvh
Henrik