Code : Tout sélectionner
For k=1 To 36
Debug AddDate(Date(), #PB_Date_Month, k)
Next k
Debug "an"
For k=1 To 36
Debug AddDate(Date(), #PB_Date_Year, k)
Next k
Code : Tout sélectionner
For k=1 To 36
Debug AddDate(Date(), #PB_Date_Month, k)
Next k
Debug "an"
For k=1 To 36
Debug AddDate(Date(), #PB_Date_Year, k)
Next k
La librairie Date permet de gérer le temps et les dates depuis 1970 jusqu'à 2034, en utilisant le modèle Unix (nombre de secondes écoulées depuis le 1er janvier 1970).
Code : Tout sélectionner
Debug AddDate(Date(), #PB_Date_Month, 24)
Code : Tout sélectionner
x = AddDate(Date(), #PB_Date_Month, -1)
Debug x
x = AddDate(Date(), #PB_Date_Month, -2)
Debug x
x = AddDate(Date(), #PB_Date_Month, -3)
Debug x