[RESOLVED] Check if a date is valid

Is there a VB6 built-in function that checks the validity of a specific date (according to the Gregorian calendar) or I must write my own?

And I mean any date. Some are obvious, some are not:

29 feb 2003 NOT VALID
31 apr any year NOT VALID
29 feb 2012 VALID
29 feb 1900 NOT VALID (exact centuries are leap years only if divisible by 400)
29 feb 2000 VALID
10 oct 1582 NOT VALID (from 5-oct till 14-oct 1582 were removed with the implementation of the Gregorian calendar)