• WeekDay

Result = WeekDay ( Date )

日付の曜日を計算します。

• 日付は処理する日付です。

曜日を表す0（日曜日）から6（土曜日）までの整数を返します。
平日に関連する定数のリストについては、定義済み定数を参照してください。

Examples

Print Now; " -> "; WeekDay(Now

Run Play

05/16/2002 22:31:30 -> 4

If WeekDay("6/8/2008") = 0 Then Print "It is a Sunday" Else Print "It is not a Sunday" Endi

Run Play

It is a Sunday

Dim DayNames As String[] Dim D As Date DayNames = ["Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday"] D = "6/8/2008" Print "It was a "; DayNames[WeekDay(D)]; " on "; Format$(D, "d mmm,yyyy")

Run Play

It was a Sunday on 8 Jun,2008

'この例では、次回の日曜日の日付が示されます。 Dim D As Date D = DateAdd(Now, gb.Day, 7 - WeekDay(Now)) Print "The next Sunday falls on "; Format$(D, "d mmm,yyyy"

Run Play

The next Sunday falls on 10 Feb,2019

See also

• Date & Time Functions

• Predefined Constants