Th3maz1ng/MyRealKmProdWiki
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Update page 'Date et heure'

Th3maz1ng 2019-03-18 17:01:34 +01:00
parent cbdf114c3d
commit 07b4759ff3
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
Date-et-heure.md

@ -1,8 +1,9 @@
# [[Date et heure|Home]] # [[Date et heure|Home]]
#### Fonction retournant le début de semaine de la semaine actuelle (le lundi) #### Fonction retournant le début de semaine de la semaine actuelle (le lundi)
##### *Paramètre d'entré : rien*
##### *Paramètre de sortie : Date* *Paramètre d'entré : rien*
``` VB *Paramètre de sortie : Date*
``` VBS
Public Shared Function GetDateWithDayAsMonday() As Date Public Shared Function GetDateWithDayAsMonday() As Date
Return Today.AddDays((Today.DayOfWeek - DayOfWeek.Monday) * -1) Return Today.AddDays((Today.DayOfWeek - DayOfWeek.Monday) * -1)
End Function End Function