Classe pour manipuler une date

0/5 (3 avis)

Snippet vu 5 420 fois - Téléchargée 44 fois

Contenu du snippet

1- Créer un module de classe
2- Nommer la classe CDates
2- Copier le code ci-dessous
3- Coller dans le module

Source / Exemple :


Option Explicit

' Variable pour la date.
Private m_strDate As String * 10
' Variable pour l'année.
Private m_strYear As String * 4
' Variable pour le mois.
Private m_strMonth As String * 2
' Variable pour le jour.
Private m_strDay As String * 2

Public Property Get getDate() As String

getDate = m_strDate

End Property

Public Property Get getYear() As String

getYear = m_strYear

End Property

Public Property Get getMonth() As String

getMonth = m_strMonth

End Property

Public Property Get getDay() As String

getDay = m_strDay

End Property

Private Sub Class_Initialize()

' Obtenir la date courante.
m_strDate = Date
' Prendre la partie année de la date.
m_strYear = Left(m_strDate, 4)
' Prendre la partie mois de la date.
m_strMonth = Mid(m_strDate, 6, 2)
' Prendre la partie jour de la date.
m_strDay = Right(m_strDate, 2)

End Sub

Conclusion :


Cette petite classe vous donnes la possibilité d'obtenir la date courante, mais aussi la partie année, mois et jour séparément.

N'oubliez pas de visiter ma page web :-)

A voir également

Ajouter un commentaire Commentaires
Dalida Messages postés 6728 Date d'inscription mardi 14 mai 2002 Statut Contributeur Dernière intervention 11 janvier 2016
16 janv. 2003 à 18:24
salut,
dans la meme veine...

MsgBox "Date = " & Date & vbCrLf & vbCrLf & _
"Jour = " & Day(Date) & vbCrLf & _
"Mois = " & Month(Date) & vbCrLf & _
"Année = " & Year(Date)

pour le format je vous renvoie au message de AlBud

A +
FunkySteps Messages postés 16 Date d'inscription mardi 26 février 2002 Statut Membre Dernière intervention 13 mars 2002
22 juil. 2002 à 14:14
Ta méthode est bonne, mais celui-là est encore plus rapide :p allez à plus :)
AlBud Messages postés 49 Date d'inscription mardi 18 juin 2002 Statut Membre Dernière intervention 19 décembre 2006
22 juil. 2002 à 08:56
utiliser plutot
format("yyyy",strdate) => année
format("dd",strdate) => jour
format("mm",strdate) => mois

ensuite y a plein de variante format("dd-mm-yyyy",strdate) et des fonctions du genre dateadd pour additionner 2 dates, datediff pour soustaire.....

A++

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.