VBA Hour फ़ंक्शन निर्दिष्ट दिनांक या समय के घंटे के अनुरूप एक पूर्णांक लौटाता है।
Hour(दिनांक_घंटा)
प्रासंगिक समय की जानकारी प्राप्त करने के लिए Hour फ़ंक्शन का उपयोग करना:
Sub HourExample1() myHour = #6:36:45 PM# MsgBox Hour(myHour) 'रिटर्न: 18 End Sub
या दिनांक और समय के अनुसार (उसी परिणाम के लिए):
Sub HourExample2() myDate = #10/31/2020 6:36:45 PM# MsgBox Hour(myDate) 'रिटर्न: 18 End Sub
यह फ़ंक्शन टेक्स्ट प्रारूप में समय के साथ समय या दिनांक भी स्वीकार करता है:
Sub HourExample3() myDate = "31/10/2020 18:36:45" MsgBox Hour(myDate) 'रिटर्न: 18 End Sub