منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - طلب كود تحديث او ريفرش كومبو بوكس

السلام عليكم
لو سمحتم ممكن كود تحديث الكومبو بوكس
لكي يتم التعرف على النوافذ التي انفتحت بعد تشغيل البرنامج

هذه صورة البرنامج
البرنامج يحتوي على موديل 1 فورم 1
مهمه الموديل التعرف على النوافذ المفتوحه بالجهاز
ولكن يجب ان تكون مفتوحه قبل ان تفتح البرنامج
اريد كود يحدث يعمل ريفرش الى الكومبو بوكس
لكي يتعرف على النوافذ المفتوحه بعد فتح البرنامج

صورة البرنامج

[ATTACH=CONFIG]1143[/ATTACH]
وايضا ساضع البرنامج بالمرفقات

nablion كتب :السلام عليكم
لو سمحتم ممكن كود تحديث الكومبو بوكس
لكي يتم التعرف على النوافذ التي انفتحت بعد تشغيل البرنامج

البرنامج يحتوي على موديل 1 فورم 1
مهمه الموديل التعرف على النوافذ المفتوحه بالجهاز
ولكن يجب ان تكون مفتوحه قبل ان تفتح البرنامج
اريد كود يحدث يعمل ريفرش الى الكومبو بوكس
لكي يتعرف على النوافذ المفتوحه بعد فتح البرنامج

السلام عليكم ورحمة الله وبركاته
قم باضافة تايمر الى المشروع وغير خاصية الانترفال الى500 Cool

ثم ادرج هذا الكود Cool

كود :

Private Sub Timer1_Timer()

Combo1.Clear

EnumWindows AddressOf EnumWindowsProc, ByVal 0&

Combo1.Text = "اختيار النافذة المفتوحة"

Combo1.Refresh

End Sub

هذا ما لدي والله اعلم:confused:
وننتظر من الاساتذة الكود الصحيح

إذا اردت داخل الكوماند فقط بدون التايمر

كود :

Combo1.Clear

EnumWindows AddressOf EnumWindowsProc, ByVal 0&

Combo1.Text = "اختيار النافذة المفتوحة"

شكرا لكم اخوتي
بصراحه شيئ جميل
الكود الاول يعمل ريفرش تلقائي
والكود الثاني يعمل ريفرش بالزر وهو المطلوب
الله يعطيكم العافيه
تم الحل

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

nablion

3amo

eng

nablion