目次
索引 🔎︎

# WeekDay Function

DateSerial ないし DateValue 関数による日付データのシリアル変換値を基に、該当する曜日を示す数値を返します。

## 構文:

    WeekDay (Number)

## 戻り値:

整数

## パラメーター:

Number: 曜日情報 (1-7) を得る日付データのシリアル変換値を示す数値表式。

下記の例では、プログラム実行日の曜日を WeekDay 関数を用いて表示させています。

## Error codes:

5 無効なプロシージャー呼び出しです

## 例:

    Sub ExampleWeekDay
    Dim sDay As String
    REM 本日の曜日の取得と表示
        Select Case WeekDay( Now )
            Case 1
                sDay="Sunday"
            Case 2
                sDay="Monday"
            Case 3
                sDay="Tuesday"
            Case 4
                sDay="Wednesday"
            Case 5
                sDay="Thursday"
            Case 6
                sDay="Friday"
            Case 7
                sDay="Saturday"
        End Select
        msgbox "" + sDay,64,"Today is"
    End Sub