تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] اريد كود لتأجيل تنفيذ الامر بالمايكروثانية
#1
السلام عليكم ورحمة الله وبركاته
اريد كود  لتأجيل تنفيذ الامر بالمايكروثانية
الرد }}}}
تم الشكر بواسطة:
#2
هل تقصد بالملي ثانية يعني 1000 ملي بالثانية , أم لا
الرد }}}}
تم الشكر بواسطة:
#3
السلام عليكم
شكرا اخى احمد منصور على الرد والاهتمام
التاجيل بالملى ثانية عندى كود ليه انا محتاج تاجيل بالمايكرو ثانية اللى هواصغر من المللى ثانية بيساوى واحد على مليون من الثانية واالواحد مل ثانية فيه 1000 ميكرو ثانية
الرد }}}}
تم الشكر بواسطة:
#4
إستخدم هذا الكود , لأقرب نتيجة للمايكرو وأيضاً للنانو , المايكرو = 1000 ملي والنانو = 1000000 ملي , ضع هذا الكود في أعلى كود الفورم :

كود :
Private Enum WaitType
        wMicroSeconds = 1
        wNanoSeconds = 2
End Enum

Private Declare Function GetTickCount& Lib "kernel32" ()

Private Function Wait(zWaitType As WaitType, zNumber As Currency)

Dim EndTime As Currency

If zWaitType = wMicroSeconds Then
   EndTime = GetTickCount + (zNumber / 1000)
ElseIf zWaitType = wNanoSeconds Then
   EndTime = GetTickCount + (zNumber / 1000000)
End If

Do Until GetTickCount >= EndTime
   DoEvents
Loop

End Function

ثم قم بإستدعاء دالة الإنتظار بهذا الشكل :

للمايكرو

كود :
Wait wMicroSeconds, 2000000

للنانو

كود :
Wait wNanoSeconds, 2000000000

المده المنتظره لكل من النوعين هي 2 ثانية
الرد }}}}
تم الشكر بواسطة:
#5
تشكر يا غالى تعبتك معاى ربنا يبارك فيك
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اريد استفسار حول اداة تكون احسن من listbox wolf1120 2 138 06-10-16, 04:45 PM
آخر رد: wolf1120
  اريد تعديل قيمة هيكس في عددة عناوين wolf1120 6 225 18-09-16, 01:13 PM
آخر رد: wolf1120
  [vb6.0] اريد مثل مافي الصورة amir عمور2016 1 129 21-07-16, 10:57 PM
آخر رد: Amir_alzubidy
  شباب اريد ازرار للفيجوال بيسك6.0 ابراهيم كركوكي 1 327 18-09-15, 06:52 PM
آخر رد: starwarr2005
  [مشروع] اريد المشروع ادراه المكتبة ام اديان 1 490 27-10-14, 02:03 AM
آخر رد: pirategg55
  اريد كود لمعرفة هل السجل الحالى يتم التعديل علية من مستخدم أخر الحزين اوى 0 379 10-09-14, 12:25 AM
آخر رد: الحزين اوى
  اريد تعلم الفيجوال بيسك ولكن بشكل ميسر افيدونى mabrook 6 1,215 18-02-14, 11:00 AM
آخر رد: سعود
  [نقاش] اريد كود تصميم برنامج تأمين الكمبيوتر بعد دقائق اسماعيل 0 585 05-12-13, 10:24 AM
آخر رد: اسماعيل

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم