Hour 函式

傳回介於 0 到 23 (含) 之間的整數，代表一天中的時數。

語法

Hour(time)

引數：

Time：必要。可代表時間的任何表示式。

支援的日期格式：

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

支援的時間格式：

hh:mm:ss

備註

下列範例使用 Hour 函式從目前的時間取得小時：

範例 1：

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

範例 2：

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

範例 3：

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

範例 4：

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