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