IBM Lotus Symphony


WeekDay 関数 [実行時]

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

構文:

WeekDay (Number)

戻り値:

整数

パラメータ:

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

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

エラーコード

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


製品フィードバック | その他の資料 | 商標