WeekDay
Result = WeekDay ( Date )
Calcola il giorno della settimana di una data.
-
Date è la data da elaborare.
Restituisce un numero intero compreso tra 0 (domenica) e 6 (sabato) che rappresenta il giorno della settimana.
Vedi
Costanti predefinite per un elenco di costanti associate ai giorni della settimana.
Esempi
Print Now; " -> "; WeekDay(Now)
If WeekDay("6/8/2008") = 0 Then
Print " È Domenica"
Else
Print "Non è Domenica"
Endif
Dim DayNames As String[]
Dim D As Date
DayNames = ["Domenica", "Lunedì", "Martedì", "Mercoledì", "Giovedì", "Venerdì", "Sabato"]
D = "6/8/2008"
Print "Era una "; DayNames[WeekDay(D)]; " del "; Format$(D, "d mmm, yyyy")
Era una Domenica del 8 Jun, 2008
' Questo esempio indica la data della prossima domenica
Dim D As Date
D = DateAdd(Now, gb.Day, 7 - WeekDay(Now))
Print "La prossima Domenica cade il "; Format$(D, "d mmm, yyyy")
La prossima Domenica cade il 10 Feb, 2019
Vedi anche