Developer Forum

Hi all,

How can I find the number of days in the month and year given?

eg. Feb 2005 has 28 days.

Thanks,
Eguy

Hi eguy

**********************************************************
Private Function NumberOfDays(lYear As Long, lMonth As Long) As Long

NumberOfDays = Day(DateSerial(lYear, lMonth + 1, 0))

End Function
***********************************************************

Good luck
Harold