Hour 函数

返回一个介于 0 和 23 之间的整数（含 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