تقييم الموضوع :
  • 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
عمر داوود
الرد }}}}


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة في تطبيق هذا الكود bidaya 0 43 06-12-16, 04:46 AM
آخر رد: bidaya
  [vb6.0] الكود باستخدام فيجوال بيسك6 تالين الورفلي 2 98 23-10-16, 10:38 AM
آخر رد: Ashraf Elafify
  اريد تعديل هذا الكود للبحث لاى كلمه فى النص رجل الكهرباء 2 124 03-10-16, 02:19 AM
آخر رد: رجل الكهرباء
Shocked [مثال] ربط قاعدة بيانات محمية في تقرير كرستال عن طريق الكود ياسر عبد الكريم 2 117 26-09-16, 11:54 PM
آخر رد: ياسر عبد الكريم
  الفرق بين تاريخين بدون احتساب ايام الجمعه والسبت mohammed.atallah 3 193 17-08-16, 09:54 AM
آخر رد: mohammed.atallah
  [سؤال] ما هو الخطاء في هذا الكود allobaed 4 148 11-08-16, 06:04 PM
آخر رد: allobaed
  احتاج الى الكود لتحويل الارقام الى حروف hicham716 10 446 07-07-16, 09:29 PM
آخر رد: hicham716
  اساتذتى الكرام ارجو المساعدة فى هذا الكود mhareek 4 188 26-06-16, 02:29 PM
آخر رد: mhareek
  [سؤال] كيف يمكننى تنفيذ هذه المعادله بالله عليكم koko_K_K_K 5 240 27-05-16, 10:10 PM
آخر رد: Microformt
  اساتذتى الكرام ارجو المساعدة فى هذا الكود mhareek 2 150 24-05-16, 11:14 AM
آخر رد: mhareek

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


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