تقوم بإرجاع نوع بيانات مفرد موضحاً عدد الثواني التي انقضت منذ منتصف الليل.

بناء الجملة

المؤقت

ملاحظات

في Microsoft Windows، ترجع الدالة Timer الأجزاء الكسرية لثانية. في Macintosh، تكون دقة جهاز الوقت ثانية واحدة.

مثال استعلام

التعبير

النتائج

SELECT Timer() AS SecondsPast FROM ProductSales GROUP BY Timer();

ترجع عدد الثواني المنقضية منذ منتصف الليل استنادا إلى وقت النظام وتعرض في العمود SecondsPast.

مثال VBA

ملاحظة: توضح الأمثلة التالية استخدام هذه الدالة في وحدة نمطية في Visual Basic for Applications (VBA). لمزيد من المعلومات حول استخدام VBA، حدد "مرجع المطور" في القائمة المنسدل إلى جانب "البحث" وأدخل مصطلحا واحدا أو أكثر في مربع البحث.

يستخدم هذا المثال الدالة Timer لإيقاف التطبيق مؤقتا. يستخدم المثال أيضا DoEvents لرضا عمليات أخرى أثناء الإيقاف المؤقت.

Dim PauseTime, Start, Finish, TotalTime
If (MsgBox("Press Yes to pause for 5 seconds", _
4)) = vbYes Then
PauseTime = 5 ' Set duration.
Start = Timer ' Set start time.
Do While Timer < Start + PauseTime
DoEvents ' Yield to other processes.
Loop
Finish = Timer ' Set end time.
TotalTime = Finish - Start ' Calculate total time.
MsgBox "Paused for " & TotalTime & " seconds"
Else
End
End If

اختيار دالة التاريخ الصحيحة

هل تحتاج إلى مزيد من المساعدة؟

توسيع المهارات
استكشاف التدريب
الحصول على الميزات الجديدة أولاً
الانضمام إلى Microsoft Insider

هل كانت المعلومات مفيدة؟

ما مدى رضاك عن جودة الترجمة؟
ما الذي أثّر في تجربتك؟

نشكرك على ملاحظاتك!

×