الوظيفة VBA: Second

وصف

ترجع الدالة VBA Second عددًا صحيحًا مطابقًا لثواني التاريخ أو الوقت المحدد.

بناء الجملة Second

Second (date_time)

مثال 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