Funzione Hour

Restituisce un numero intero tra 0 e 23 (compreso), a rappresentare le ore del giorno.

Sintassi

Hour(time)

Argomenti:

Time: obbligatorio. Qualsiasi espressione che può rappresentare un'ora.

Formati di data supportati:

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

Formato di ora supportato

hh:mm:ss

Note

Nell'esempio seguente viene utilizzata la funzione Hour per ottenere l'ora in base all'ora corrente.

Esempio 1

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

Esempio 2

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

Esempio 3

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

Esempio 4

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