From 07b4759ff318b38173c9996f8d2a3b996a01dff4 Mon Sep 17 00:00:00 2001 From: Th3maz1ng Date: Mon, 18 Mar 2019 17:01:34 +0100 Subject: [PATCH] Update page 'Date et heure' --- Date-et-heure.md | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/Date-et-heure.md b/Date-et-heure.md index f824dff..ee2a916 100644 --- a/Date-et-heure.md +++ b/Date-et-heure.md @@ -1,8 +1,9 @@ # [[Date et heure|Home]] #### Fonction retournant le début de semaine de la semaine actuelle (le lundi) -##### *Paramètre d'entré : rien* -##### *Paramètre de sortie : Date* -``` VB + +*Paramètre d'entré : rien* +*Paramètre de sortie : Date* +``` VBS Public Shared Function GetDateWithDayAsMonday() As Date Return Today.AddDays((Today.DayOfWeek - DayOfWeek.Monday) * -1) End Function