FAQ

 Problèmes de Date

Syntaxe : FirstDayMonth(#9/17/2003#)


Function FirstDayMonth(LaDate As Date) As Date

FirstDayMonth = DateSerial(Year(LaDate), Month(LaDate), 1)

End Function


Date de création :01/11/2005 22:58 Dernière modification :02/02/2007 03:40