Fonction Hour

Renvoie un nombre entier compris entre 0 et 23, représentant l'heure.

Syntaxe

Hour(time)

Arguments :

time : requis. Toute expression qui peut représenter une heure.

Formats de date pris en charge :

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

Format d'heure pris en charge :

hh:mm:ss

Remarques

L'exemple suivant utilise la fonction Hour pour obtenir l'heure de l'heure actuelle :

Exemple 1 :

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

Exemple 2 :

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

Exemple 3 :

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

Exemple 4 :

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