Fonction WeekDay(BASIC)

Renvoie le numéro correspondant au jour de la semaine représenté par un numéro de date sériel généré par la fonction DateSerial ou DateValue.

Syntaxe :


WeekDay (Number)

Valeur de retour :

Nombre entier

Paramètres :

Number : expression au format nombre entier contenant le numéro de date sériel utilisé pour calculer le jour de la semaine (1-7).

L'exemple suivant détermine le jour de la semaine à l'aide de la fonction WeekDay lorsque vous saisissez une date.

Codes d'erreur :

5 appel de procédure incorrect

Exemple :


Sub ExampleWeekDay
Dim sDay As String
' Renvoyer et afficher le jour de la semaine
    Select Case WeekDay( Now )
        Case 1
            sDay="Dimanche"
        Case 2
            sDay="Lundi"
        Case 3
            sDay="Mardi"
        Case 4
            sDay="Mercredi"
        Case 5
            sDay="Jeudi"
        Case 6
            sDay="Vendredi"
        Case 7
            sDay="Samedi"
    End Select
    Msgbox "" + sDay,64,"Date du jour"
End Sub

Aidez-nous !