函数VBA：Second

描述

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

语法 Second

Second（日期时间）

示例 VBA Second

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

Sub SecondExample1()
    
    myHour = #6:36:45 PM#
    
    MsgBox Second(myHour) '退货：45

End Sub

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

Sub SecondExample2()
    
    myDate = #10/31/2020 6:36:45 PM#
    
    MsgBox Second(myDate) '退货：45

End Sub

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

Sub SecondExample3()
    
    myDate = "31/10/2020 18:36:45"
    
    MsgBox Second(myDate) '退货：45

End Sub