الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف ارتب الاحداث في التايمر

مغلق
بدأه طريق الامل في 28 ديسمبر 2006 · 4 رد · 881 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته

بحثت في المنتدى ولم اجد الحل والسؤال هو

يوجد لدي 4 تايمر في كل تايمر أمر معين

اريد ان ينفذ التايمر الاول ثم التايمر الثاني وهكذا..

بحيث عندما ينفذ التايمر الاول لا يتنفذ البقية

ما هو الكود المستخدم؟؟

ارجو انكم فهمتم قصدي

#2

الحل انك تخلي خاصية ال ENABLE للتايمر الاول TRUE والباقي FALSE

وفي نهاية كود التايمر الاول تحولي التايمر الأول FALSE والتاني TRUE وبعدين التاني FALSE والتالت TRUEوهكذا

#3

شكرا اخي

لكن الا توجد طريقة اسهل يعني مثلا اذا كان لدي مثلا 10 تايمر

تم تعديل هذه المشاركة بواسطة طريق الامل في 28 ديسمبر 2006 في 15:50

#5

السلام عليكم

الحل هو مصفوفة الكائنات

قم باضافة اداة تايمر و اعملي كوبي بيست ستظهر لكي رساله تسأل هل ترغب في ان شاء مصفوفة كائنات اختاري نعم :lol:

وكرري العمليه مره اخر كوبي بيست ليصبح لديك 3 ادوات تايمر

ثم جربي الكود التالي و عدلي عليه كما ترغبين :::: ;)

Private Sub Timer1_Timer(Index As Integer)
Select Case Index
Case Is = 0: MsgBox "Timer" & Index
Case Is = 1: MsgBox "Timer" & Index
Case Is = 2: MsgBox "Timer" & Index
End Select
End sub

ملاحظة للخروج من الكود بسبب تكرار ال Msgbox اضغط في الكيبورد ctrl + pause break ومن ثم stop في الفيجوال بيسك

واي مساعده ارجو تنبيهي عن طريق الخاص ;)

تم تعديل هذه المشاركة بواسطة Super_Pro في 30 ديسمبر 2006 في 03:53

مع تحيات : عبدالرحمن نورالله
بيلار الدولية للتكنولوجيا لتصميم وأستضافة مواقع الأنترنت ، شركة مسجلة في المملكة الاردنية الهاشمية

أستضافة مواقع (Website Hosting) ابتداء من 35دينار اردني (50$) سنوي 962799247524+ أضغط هنا

logo.png

هذا الموضوع مغلق.

مواضيع مشابهة