WEEKDAY
- Source: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgWeekday
- Last revised: 2016-03-13
Gets the number of day of the week from a Date Serial
Syntax
` declare function Weekday ( byval serial as double , byval firstdayofweek as long = fbusesystem ) as long
`
Usage
#include "vbcompat.bi"
result = Weekday( date_serial [, firstdayofweek ] )Parameters
date_serial
the date
firstdayofweek
the first day of the week
Return Value
Returns the week day number from a variable containing a date in Date Serial format.
Description
The week day values must be in the range 1-7, its meaning depends on the firstdayofweek parameter
firstdayofweek is optional.
| value | first day of week | constant |
|---|---|---|
| omitted | 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 |
The compiler will not recognize this function unless vbcompat.bi is included.
Examples
start GeSHi
vb
#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)end GeSHi
Differences from QB
- Did not exist in QB. This function appeared in PDS and VBDOS
See also
Back to DocToc