[نبيل فتحى]

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

PHP كود :

Public frety As Control = _name 


بس حددت فورم واحد 
وعند فتح الفورم التانى 

PHP كود :

  frety.Hide()
        FORMPRO.MdiParent = Me
        FORMPRO.Show()
        FORMPRO.Activate()
        FORMPRO.txtnamept.Focus() 


بس مش مش قادر اخليه يحمل قيمة اكتر من فورم باى شكل 
انا مش عارف اخليه يحمل قيمتين وطبعا كده ملهاش لازمه لو بيحمل قيمه واحده كنت هعمل form_anyform.close
اسهل وده ممكن يكون حل بس لو فى فورم كتير فى المشروع يبقى صعب كمية الاكواد الى هتكتبها عند فتح كل فورم و ممكن يتقل البرنامج كمان 
فارجوا المساعده من الخبرا تكرما

[wale90]

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

كود :

Dim frm As New FORMPRO
frm.MdiParent = Me
frm.Show()

[ابو ليلى]

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

وفق ما فهمت من طلبك (عند فتح فورم يتم غلق كافة الفورمات وصلت لنص الحل وارجو من الخبراء المساعده)

اذا كانت كل الفورمات تفتح بنفس طريقة كتابتك للكود , اذاً فهي ابناء لفورم رئيسي
يبقى علينا اجراء لفة على الفورمات المفتوحة و غلقها , جرب الكود التالي

PHP كود :

       For Each frm In Me.MdiChildren
            frm.Close()
        Next
        FORMPRO.Show() 


ضع الكود التالي في حدث تحميل النموذج  FORMPRO .

PHP كود :

       Me.ActiveControl = txtnamept 


[نبيل فتحى]

(30-09-17, 07:56 PM)ابو ليلى كتب : السلام عليكم و رحمة الله و بركاته

وفق ما فهمت من طلبك (عند فتح فورم يتم غلق كافة الفورمات وصلت لنص الحل وارجو من الخبراء المساعده)

اذا كانت كل الفورمات تفتح بنفس طريقة كتابتك للكود , اذاً فهي ابناء لفورم رئيسي
يبقى علينا اجراء لفة على الفورمات المفتوحة و غلقها , جرب الكود التالي

PHP كود :

       For Each frm In Me.MdiChildren
            frm.Close()
        Next
        FORMPRO.Show() 


ضع الكود التالي في حدث تحميل النموذج  FORMPRO .

PHP كود :

       Me.ActiveControl = txtnamept 


وربنا استاذ ورئيس قسم