TimeSerial Function

উল্লেখযোগ্য ঘন্টা, মিনিট এবং সেকেন্ড প্যারামিটারের একটি ক্রমানুসার সময় মান হিসাব করা হয় যা সংখ্যাসূচক মান হিসেবে পাস করে থাকে। আপনি তারপর সময়ের মধ্য পার্থক্য হিসাব করার জন্য এই মান ব্যবহার করতে পারেন।

সিনট্যাক্স:

TimeSerial (hour, minute, second)

প্রদান মান:

তারিখ

প্যারামিটার:

ঘন্টা: যেকোনো ইনটিজার এক্সপ্রেশন যা ক্রমানুসার সময় মান নির্ধারণ করতে ব্যবহৃত সময়ের ঘন্টা নির্দেশ করে থাকে । বৈধ মান: ০-২৩।

মিনিট: সময়ের মিনিট নির্দেশক যেকোনো ইনটিজার এক্সপ্রেশন যা ক্রমানুসার সময় মান নির্ধারণ করার জন্য ব্যবহৃত হয়ে থাকে। সাধারণভাবে, আপনি ০ এবং ৫৯ এর মধ্যে একটি মান ব্যবহার করতে পারেন। যদিও, পরিসরের বাইরে অবস্থিত মানও ব্যবহার করতে পারেন, যেখানে মিনিটের সংখ্যা ঘন্টা মানকে প্রভাবিত করে থাকে।

সেকেন্ড: সময়ের সেকেন্ড নির্দেশক যেকোনো ইনটিজার এক্সপ্রেশন যা ক্রমানুসার সময় মান নির্ধারণ করার জন্য ব্যবহৃত হয়ে থাকে। সাধারণভাবে, আপনি ০ এবং ৫৯ এর মধ্যে একটি মান ব্যবহার করতে পারেন। যদিও, পরিসরের বাইরে অবস্থিত মানও ব্যবহার করতে পারেন, যেখানে সেকেন্ডেরর সংখ্যা মিনিটের মানকে প্রভাবিত করে থাকে।

উদাহরণ:

১২, -৫, ৪৫ হলো ১১, ৫৫, ৪৫ সংশ্লিষ্ট

12, 61, 45 মানসমূহ 13, 2, 45 এর সাথে সংশ্লিষ্ট

12, 20, -2 মানসমূহ 12, 19, 58 এর সাথে সংশ্লিষ্ট

12, 20, 63 মানসমূহ 12, 21, 4 এর সাথে সংশ্লিষ্ট

TimeSerial ফাংশন ব্যবহার করে যেকোনো সময়কে একক মানে রূপান্তর করা যায় যা সময়ের পার্থক্য গণনা করার জন্য ব্যবহৃত হয়।

TimeSerial ফাংশনটি VarType 7 (তারিখ) সহ ধরন ভেরিয়েন্ট প্রদান করে থাকে। এই মানটি অভ্যন্তরীণভাবে ০ এবং ০.৯৯৯৯৯৯৯৯৯৯ এর মধ্যে একটি ডাবল-প্রিসিশন সংখ্যা হিসেবে সংরক্ষিত থাকে। DateSerial অথবা DateValue ফাংশনের বিপরীত হিসেবে, যেখানে ক্রমানুসার তারিখ মান একটি নির্দিষ্ট তারিখ সংশ্লিষ্ট দিন হিসেবে হিসাব করা হয়, আপনি TimeSerial ফাংশন দ্বারা প্রদান করা মান দ্বারা তা গণনা করতে পারেন, কিন্তু আপনি তা মূল্যায়ন করতে পারেন না।

TimeValue ফাংশনে, আপনি সময় নির্দেশক একটি স্ট্রিং প্যারামিটার হিসেবে পাস করতে পারেন। TimeSerial ফাংশনের জন্য, যদিও, আপনি স্বতন্ত্র প্যারামিটার (ঘন্টা, মিনিট, সেকেন্ড) একটি পৃথক সংখ্যাসূচক এক্সপ্রেশন হিসেবে পাস করতে পারেন।

উদাহরণ:

Sub ExampleTimeSerial
Dim dDate As Double, sDate As String
    dDate = TimeSerial(8,30,15)
    sDate = TimeSerial(8,30,15)
    MsgBox dDate,64,"Time as a number"
    MsgBox sDate,64,"Formatted time"
End Sub