Date Serial から、曜日の数を得ます。
構文:
用法:
#include "vbcompat.bi"
result = Weekday
( date_serial [, firstdayofweek ] )
パラメタ:
date_serial
日付
firstdayofweek
週の最初の日。
戻り値:
記述:
週の日の値は、範囲 1-7 になります。その意味は、firstdayofweek パラメタに依存します。
firstdayofweek は、任意です。
| 値 | 週の初日 | 定数 |
| 省略 | sunday |
|
| 0 | local settings | fbUseSystem |
| 1 | sunday | fbSunday |
| 2 | monday | fbMonday |
| 3 | tuesday | fbTuesday |
| 4 | wednesday | fbWednesday |
| 5 | thursday | fbThursday |
| 6 | friday | fbFriday |
| 7 | saturday | fbSaturday |
例:
#include
"vbcompat.bi"
Dim a
As Double =
DateSerial (2005,
11,
28) +
TimeSerial
(7,
30,
50)
Print Format(a,
"yyyy/mm/dd hh:mm:ss ");
Weekday(a
)
a =
Now()
Print Format(a,
"yyyy/mm/dd hh:mm:ss ");
Weekday(a
)
Sleep
- QBでは、存在しませんでした。
この関数は、PDS と VBDOS に現れました。
参照:
