[حكاية وطن]

السلام عليكم ورحمة الله وبركاته
لو سمحتم عندي برنامج فيجوال بيسك 6.0 ويوجد فيه عدة شاشات، اريد عند فتح شاشة ان لا يسمح لي بأن فتح شاشة اخرى الا بعد اغلاق الشاشة التي قمت بفتحها
وشكرا جزيلا

[sendbad100]

السلام عليكم

  بفرض ان الفورم   الرئيسي  اسمه    "Form_MDI"


عند فتح الفورم  استخدم الكود التالي

PHP كود :

Form_MDI.Enabled = False
Form1.Show 


وعند اغلاقة 

PHP كود :

Form_MDI.Enabled = True
Unload Me 


[Ahmed_Mansoor]

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

أهلا بك أخي الكريم ، إضافة إلى ما قدمه أخي العزيز السندباد١٠٠ ، طريقة أخرى قم بتعريف متغير من نوع منطقي يعني قيمتة تكون إنا True أو False قم بتعريفه في موديل Module وعرفه كـ Public وليس بـ Dim العاديه وليكن إسم هذا المتغير هو IsAnyFormOpen ثم ضع هذا الكود في المكان الذي تشغل أو تظهر الفورم منه :

PHP كود :

IF IsAnyFormOpen = True Then Exit Sub
Form1.Show
IsAnyFormOpen = True 


وهذا الكود ضعه في حدث الـ Form_Unload لكل فورم :

PHP كود :

IsAnyFormOpen = False 


[حكاية وطن]

(11-07-17, 09:32 AM)sendbad100 كتب : السلام عليكم

  بفرض ان الفورم   الرئيسي  اسمه    "Form_MDI"


عند فتح الفورم  استخدم الكود التالي

PHP كود :

Form_MDI.Enabled = False
Form1.Show 


وعند اغلاقة 

PHP كود :

Form_MDI.Enabled = True
Unload Me 


شكرا على ردك الجميل

---

(11-07-17, 09:55 AM)Ahmed_Mansoor كتب : وعليكم السلام و رحمة الله و بركاته

أهلا بك أخي الكريم ، إضافة إلى ما قدمه أخي العزيز السندباد١٠٠ ، طريقة أخرى قم بتعريف متغير من نوع منطقي يعني قيمتة تكون إنا True أو False قم بتعريفه في موديل Module وعرفه كـ Public وليس بـ Dim العاديه وليكن إسم هذا المتغير هو IsAnyFormOpen ثم ضع هذا الكود في المكان الذي تشغل أو تظهر الفورم منه :

PHP كود :

IF IsAnyFormOpen = True Then Exit Sub
Form1.Show
IsAnyFormOpen = True 


وهذا الكود ضعه في حدث الـ Form_Unload لكل فورم :

PHP كود :

IsAnyFormOpen = False 


شكرا على ردك الجميل

[سعود]

مارايكم بالكود التالي:
Form2.Show 1
اليس هو المطلوب؟