Función Hour

Devuelve un número entero entre 0 y 23, ambos incluidos, que representa la hora del día.

Sintaxis

Hour(time)

Argumentos:

Time: necesario. Cualquier expresión que pueda representar una hora.

Formatos de fecha soportados:

• MM-DD-YYYY
• MM/DD/YYYY
• DD-MM-YYYY
• DD/MM/YYYY
• YYYY-MM-DD
• YYYY/MM/DD

Formato de hora soportado:

hh:mm:ss

Observaciones

En el siguiente ejemplo se utiliza la función Hour para obtener la parte de hora de la hora actual:

Ejemplo 1:

Dim MyTime, MyHour
MyTime = Now
MyHour = Hour(MyTime)
'Output: current hour.

Ejemplo 2:

Dim MyTime, MyHour
MyTime = "14:30:00"    ' Specific time value.
MyHour = Hour(MyTime)  
'Output: 14

Ejemplo 3:

Dim MyDateTime, MyHour
MyDateTime = "21/01/2025 18:45:00"    ' Date-Time value.
MyHour = Hour(MyDateTime)             
'Output: 18

Ejemplo 4:

Dim MyDateTime, MyHour 
MyDateTime = DateAdd("h", 5, Now) 
MyHour = Hour(MyDateTime) 
'Output: If current time is 1 PM, then it returns 18