[سعود]

بعد اذنكم جميعا مرة اخرى اريد احاول معكم.
[مشروع] فكرة توفير الجهد (بخصوص المصفوفات)
[مشروع] إعادة فكرة توليد موديول
ارجو ان تعرف جدوى هذه الفكرة  فقد تغنيك عن كتابة كم هائل من اكواد تكون مكررة ومتشابهة والفرق بسيط.

[سعود]

PHP كود :

Public Sub color(ByRef con As Control, i As Integer, b As Boolean)
  If (TypeOf con Is TextBox Or TypeOf con Is ComboBox) And b = True Then
   con.BackColor = vbYellow
   Else
  con.BackColor = vbWhite
  End If
End Sub

Private Sub Combo2_GotFocus(Index As Integer)
color Combo2(Index), Index, True
End Sub

Private Sub Combo2_LostFocus(Index As Integer)
color Combo2(Index), Index, False
End Sub

Private Sub Text1_GotFocus(Index As Integer)
color Text1(Index), Index, True
End Sub

Private Sub Text1_LostFocus(Index As Integer)
color Text1(Index), Index, False
End Sub 


هذه الطريقة تكون ناجحة اذا فعلت مصفوفة الادوات واقصد تنسخ الادوات وتلصقها وتوافق على رسائل التحذير.


تحتاج فقط حدثين لكل نوع مربع نص وكومبو

[mhareek]

اخى الغالى   سعود  جزاك الله خيرا على اهتمامك وتعبك        

المشكلة اخى انى فى الفورم حقى يوجد حوالى 100 تكست على كومبو بوكس    وبالتالى يجب على ان اكتب 200 كود لاداء هذة المهمه لكل تكست 2 كود


مع ان الكود الى انا ارفقتة بالاعلى    هو لاخى الاستاذ  احمد عبد الحميد      وهويقوم بمسح جمبع محتويات التكيست بوكس واكومبوبوكس فى الفورم  مرة واحدة



فانا كنت اريد احد الاساتذة الكرام يقوم بالتعديل علية     بحيث يتغير لون جميعهم ايضا بكود واحد فقط

[سعود]

(19-03-20, 07:27 PM)mhareek كتب : اخى الغالى   سعود  جزاك الله خيرا على اهتمامك وتعبك        

المشكلة اخى انى فى الفورم حقى يوجد حوالى 100 تكست على كومبو بوكس    وبالتالى يجب على ان اكتب 200 كود لاداء هذة المهمه لكل تكست 2 كود


مع ان الكود الى انا ارفقتة بالاعلى    هو لاخى الاستاذ  احمد عبد الحميد      وهويقوم بمسح جمبع محتويات التكيست بوكس واكومبوبوكس فى الفورم  مرة واحدة



فانا كنت اريد احد الاساتذة الكرام يقوم بالتعديل علية     بحيث يتغير لون جميعهم ايضا بكود واحد فقط

فاهم عليك والمطلوب واضح جدا.
لو تعيد العمل مع مشروع جديد بالفكرة اظن افضل .

---

لو تلاحظ في المثال اللي انا رفعته الاخير لن تحتاج الا اداة واحدة لكل نوع والباقي ينطبق عليه الحدث.
اظن لو عرفت الكود وفائدته ستعيد مشروعك من جديد للعمل بهذه الفكرة.
جرب بمشروع تجريبي  لن تخسر شيئا.

[mhareek]

اخى الغالى بارك الله فيك جرب فى مشروعك ضع 5 تكست و 5 كومبو بوكس ووضح لى كيف يكون الكود جزاك الله خيرا

[سعود]

(19-03-20, 10:32 PM)mhareek كتب : اخى الغالى    بارك الله فيك          جرب فى مشروعك    ضع  5 تكست   و 5 كومبو بوكس        ووضح لى كيف يكون الكود    جزاك الله خيرا

انا جربت  3 تكست وثلاثة كومبو ونجحت الطريقة...هل فيه سر باكثر من ذلك؟
ساجرب

---

جربت اخي والذي عملته في هذه المرة فقط نسخ التكست والكومبو ولم اضف اي كود

[سعود]

شرح بسيط فيديو للطريقة اللتي اعرفها

https://www.youtube.com/watch?v=M13Q8a9k6BM

[mhareek]

جزاك الله خيرا اخى سعود           بارك الله فيك   وقد اشتركت فى قناتك