DAY

• Source: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgDay
• Last revised: 2022-03-25

---

Gets the day of the month from a Date Serial

Syntax

` declare function Day ( byval date_serial as double ) as long

`

Usage

#include "vbcompat.bi"
result = Day( date_serial )

Parameters

date_serial

the date

Return Value

Returns the day of the month from a variable containing a date in Date Serial format.

Description

The compiler will not recognize this function unless vbcompat.bi is included.

Examples

start GeSHi

#include "vbcompat.bi"

Dim ds As Long = DateSerial(2005, 11, 28)

Print Format(ds, "yyyy/mm/dd "); Day(ds)

end GeSHi

Differences from QB

• Did not exist in QB. This function appeared in PDS and VBDOS

See also

• Date Serials

Back to DocToc