VBA Hour()函数

Hour()函数返回0到23之间的数字，表示指定时间戳的一天中的小时。

语法

Hour()

示例

添加一个模块，并添加以下示例代码 -

Private Sub Constant_demo_Click()
   msgbox("Line 1: " & Hour("3:13:45 PM"))
   msgbox("Line 2: " & Hour("23:13:45"))
   msgbox("Line 3: " & Hour("2:20 PM"))
End Sub

执行上面示例代码，得到以下结果 -

Line 1: 15
Line 2: 23
Line 3: 14