DETERMINE LE NOMBRE DE JOURS DANS UN MOIS

 
'***********************************************************************************************************
' Name       : xMonthDays
' Purpose    : Retrive the number of days in a month for a determined date.
' Syntax     : xMonthDays(TheDate)
' Parameters : TheDate : A date
' Return     : The number of days. eg: 28, 31, etc...
'***********************************************************************************************************
Public Function xMonthDays(ByVal TheDate As Date) As Byte
    xMonthDays = Day(DateAdd("m", 1, TheDate) - Day(DateAdd("m", 1, TheDate)))
End Function 

• TESTER SI UN LECTEUR (RESEAU OU NON) EST ACCESSIBLE ET/OU EXISTE
• SAVOIR SI UNE FENETRE EST CHARGEE
• FAIRE UNE PAUSE D'UN CERTAIN NOMBRE DE SECONDES
• SAVOIR SI UN NOMBRE EST PAIR OU IMPAIR
• CONVERTION D'UN NOMBRE EN UNE FRACTION

• FUSEAUX MATIC
• AVERTISSEUR
• CREATION DU VERSION SHAREWARE
• ERYGENDA ÉTERNEL OU PRESQUE. VERSION DE BASE, SANS ATTACHEMENTS À DES DOCUMENTS
• HORLOGE 2

• VACHE TAUREAU BY CHIHAOUI
• CHIFFRE EN LETTRE FONCTION
• NOMBRE DE JOURS DANS LE MOIS
• NOMBRE DE JOURS DANS LE MOIS
• NOMBRE DE JOURS