تقوم بإرجاع متغير (تاريخ) يتضمن الوقت بالساعة والدقيقة والثانية المحددة.
بناء الجملة
TimeSerial ( ساعة، دقيقة، ثانية )
Warning تأكد من أن الوسيطات في النطاق الصحيح من القيم. يمكن أن تؤدي الوسيطة غير الصالحة إلى نتيجة غير صحيحة.
يحتوي بناء جملة الدالة TimeSerial على هذه الوسيطات:
|
الوسيطة |
الوصف |
|
ساعة |
مطلوبة. متغير (عدد صحيح). الرقم بين 0 (12:00 ص) و23 (11:00 مساء)، ضمنا، أو تعبير رقمي. |
|
دقيقه |
مطلوبة. متغير (عدد صحيح). أي تعبير رقمي. |
|
الثانيه |
مطلوبة. متغير (عدد صحيح). أي تعبير رقمي. |
ملاحظات
لتحديد وقت، مثل 11:59:59، يجب أن يكون نطاق الأرقام لكل وسيطة TimeSerial في النطاق العادي للوحدة؛ أي 0-23 للساعات و0-59 للدقائق والثوان. ومع ذلك، يمكنك أيضا تحديد أوقات نسبية لكل وسيطة باستخدام أي تعبير رقمي يمثل بعض الساعات أو الدقائق أو الثوان قبل وقت معين أو بعده. يستخدم المثال التالي التعبيرات بدلا من أرقام الوقت المطلق. ترجع الدالة TimeSerial وقتا لمدة 15 دقيقة قبل (-15) بست ساعات قبل الظهر (12 - 6)، أو 5:45:00 ص.
TimeSerial(12 - 6, -15, 0)
عندما تتجاوز أي وسيطة النطاق العادي لتلك الوسيطة، فإنها تزيد إلى الوحدة الأكبر التالية حسب الاقتضاء. على سبيل المثال، إذا حددت 75 دقيقة، يتم تقييمها كساعة واحدة و15 دقيقة. إذا كانت أي وسيطة واحدة خارج النطاق -32768 إلى 32767، يحدث خطأ. إذا تسبب الوقت المحدد بواسطة الوسيطات الثلاث في أن يقع التاريخ خارج النطاق المقبول للتواريخ، يحدث خطأ.
مثال على الاستعلام
|
تعبير |
النتائج |
|
SELECT TimeSerial(18,12,10) AS NewTime FROM ProductSales GROUP BY TimeSerial(18,12,10); |
إرجاع "الوقت" الذي يتكون من ساعة دقيقة وثانية محددة تم إدخالها في وسيطات الدالة ويعرض في العمود NewTime. النتيجة: "6:12:10 مساء". |
مثال VBA
ملاحظة: توضح الأمثلة التالية استخدام هذه الدالة في وحدة Visual Basic for Applications (VBA). لمزيد من المعلومات حول العمل مع VBA، حدد مرجع المطور في القائمة المنسدلة بجوار البحث وأدخل مصطلحا واحدا أو أكثر في مربع البحث.
يستخدم هذا المثال الدالة TimeSerial لإرجاع وقت للساعة والدقيقة والثانية المحددة.
Dim MyTime
MyTime = TimeSerial(16, 35, 17)
' MyTime contains serial representation of 4:35:17 PM.
