Gets the number of day of the week from a Date Serial

declare function Weekday ( byval serial as double , byval firstdayofweek as long = fbusesystem ) as long

#include "vbcompat.bi"
result = Weekday( date_serial [, firstdayofweek ] )

the date
the first day of the week

Return Value:
Returns the week day number from a variable containing a date in Date Serial format.

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.

#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)

Differences from QB:
See also:
Back to Date and Time Functions
Valid XHTML :: Valid CSS: :: Powered by WikkaWiki

sf.net phatcode