VBA - Hour 函数

Hour 函数返回一个介于 0 到 23 之间的值，表示指定时间戳的小时数。

语法

Hour(time) 

示例

添加一个按钮并添加以下函数。

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