Returns a Variant (Integer) specifying a whole number between 0 and 23, inclusive, representing the hour of the day.
Hour( time )
This example uses the Hour function to obtain the hour from a specified time. In the development environment, the time literal is displayed in short time format using the locale settings of your code.
Dim MyTime, MyHour MyTime = #4:35:17 PM# ' Assign a time. MyHour = Hour(MyTime) ' MyHour contains 16.