Hour

Home › Date and Time Functions › Hour

Hour

Returns the hour of a date serial, 0 to 23.

Syntax

Declare Function Hour ( ByVal date_serial As Double ) As Long

Parameters

• date_serial

Description

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

Return Value

Returns the hour from a variable containing a date in Date Serial format.

Remarks

Usage

#include "vbcompat.bi"

result = Hour( dateserial )

Differences from QB

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

Examples

#include "vbcompat.bi"

Dim ds As Double = DateSerial(2005, 11, 28) + TimeSerial(7, 30, 50)

Print Format(ds, "yyyy/mm/dd hh:mm:ss "); Hour(ds)

---

Category: Date and Time Functions
Kind: function

---

Reproduced from the FreeBASIC Wiki Manual under the GNU Free Documentation License 1.3 — with no Invariant Sections, no Front-Cover Texts and no Back-Cover Texts. Copyright © the FreeBASIC project and wiki contributors. See License.