函数VBA：Hour

描述

VBA Hour 函数返回与指定日期或时间的小时相对应的整数。

语法 Hour

Hour（日期_小时）

示例 VBA Hour

使用Hour函数获取相关时间信息：

Sub HourExample1()
    
    myHour = #6:36:45 PM#
    
    MsgBox Hour(myHour)   '返回：18

End Sub

或者按日期和时间（相同的结果）：

Sub HourExample2()
    
    myDate = #10/31/2020 6:36:45 PM#
    
    MsgBox Hour(myDate)   '返回：18

End Sub

此函数还接受文本格式的时间或带有时间的日期：

Sub HourExample3()
    
    myDate = "31/10/2020 18:36:45"
    
    MsgBox Hour(myDate)   '返回：18

End Sub