تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[كود] كود لتأجيل تنفيذ الكود بدون Timer!
#1
Lightbulb 
يمكننا تأجيل تنفيذ الكود بالثواني من دون أداة Timer فقط Command1
كود :
Public Sub Delay(Times As Double)
TempTime = DateAdd("s", Times, Now)
While TempTime > Now
DoEvents
Wend
End Sub
'==============
Private Sub Command1_Click()
Delay 5
MsgBox "test"
End Sub
عمر داوود
الرد


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ربط اداة datareport مع قاعدة البينات عن طريق الكود عبدالله الصافي 2 179 15-07-18, 02:30 AM
آخر رد: عبدالله الصافي
  ارجو المساعدة فى هذا الكود mhareek 1 110 02-05-18, 07:18 PM
آخر رد: Amir_alzubidy
  [vb6.0] تنفيذ شرط على الأرقام العشرية samprg11 2 163 13-04-18, 10:23 PM
آخر رد: samprg11
Question [vb6.0] هل يمكن تغير اسم المستخدم وكلمة المرور إذا كنت موجودة ضمن الكود ؟؟ Microformt 2 205 12-03-18, 07:09 AM
آخر رد: Microformt
  ما هو الخطأ فى هذا الكود مبرمج مصرى 0 98 07-02-18, 04:59 PM
آخر رد: مبرمج مصرى
  التعديل على هذا الكود جزاكم الله خيرا bidaya 4 185 10-01-18, 03:38 AM
آخر رد: bidaya
  [سؤال] تنفيذ تقرير و ارسال ايميل aboezzat84 1 198 29-11-17, 03:03 PM
آخر رد: Amir_alzubidy
  اريد كتابة هذا الكود الى لغة الفيجول 6 bidaya 3 305 30-09-17, 08:27 PM
آخر رد: bidaya
Question [vb6.0] هل يمكن تنفيذ اومر دوس من خلال فجوال البيسك 6 ؟؟ Microformt 2 272 01-09-17, 12:27 AM
آخر رد: Microformt
  ظهور الخط العربي بخط غريب داخل شاشة الكود للفيجوال بيسك في الوندوز 10 allobaed 2 428 08-08-17, 03:09 AM
آخر رد: allobaed

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


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