Hour-Funktion

Gibt eine Ganzzahl zwischen 0 und 23 (einschließlich) zurück, die die Stunde des Tages angibt.

Syntax

Hour(time)

Argumente:

Time: Erforderlich. Jeder Ausdruck, der eine Zeitangabe sein kann.

Unterstützte Datumsformate:

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

Unterstütztes Zeitformat:

hh:mm:ss

Anmerkungen

Im folgenden Beispiel wird mit der Hour-Funktion die Stunde aus der aktuellen Zeitangabe abgerufen:

Beispiel 1:

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

Beispiel 2:

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

Beispiel 3:

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

Beispiel 4:

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