ظهور رسالة MsgBox في وقت معين

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل

ظهور رسالة MsgBox في وقت معين

مُساهمة من طرف Coptic_Programmer في الجمعة يوليو 03, 2009 9:38 am

أضف زر أمر Command1

ضع الكود التالي في قسم التصريحات General:

Public Sub Delay(HowLong As Date)
TempTime = DateAdd('s', HowLong, Now)
While TempTime > Now
DoEvents
Wend
End Sub


ضع السطر التالي في الزر أو في أي مكان أخر

Delay 5
MsgBox ' منتديات المبرمجون الاقباط', vbExclamation, ' منتدى'

Coptic_Programmer
مشرف برامج
مشرف برامج

المساهمات : 43
تاريخ التسجيل : 29/10/2008

معاينة صفحة البيانات الشخصي للعضو

الرجوع الى أعلى الصفحة اذهب الى الأسفل

استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة


 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى