منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
يرجى المساعدة لحل مشكلة عند تشغيل نفس الفورم اكثر من مرة vb.net - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : يرجى المساعدة لحل مشكلة عند تشغيل نفس الفورم اكثر من مرة vb.net (/showthread.php?tid=27124)



يرجى المساعدة لحل مشكلة عند تشغيل نفس الفورم اكثر من مرة vb.net - ahmadpal - 26-10-18

بسم الله الرحمن الرحيم 

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

اخوتي الاعزاء ارجوا المساعدة في حل هذه المشكلة ولكم مني جزيل الشكر 

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

 Dim foorm2 As New form1

        foorm2.MdiParent = home

       () foorm2.Show



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


RE: يرجى المساعدة لحل مشكلة عند تشغيل نفس الفورم اكثر من مرة vb.net - ahmadpal - 03-11-18

Angry  لماذا لا يوجد اجابة على سؤالي


RE: يرجى المساعدة لحل مشكلة عند تشغيل نفس الفورم اكثر من مرة vb.net - elgokr - 03-11-18

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

مرحباً اخى ahmadpal
اعزر فليس الجمجيع متواجد هنا دائماً

بخصوص سؤالك حتى تقوم بحل المشكلة
اجعل كود اللود الموجود فى الفروم المطلوب فتحه
ان يكون فى كود حدث الزر الخاص بفورم home
وان يكون الكود اعلى 
كود :
foorm2.Show()

بكده كل مرة تقوم بفتح الفورم سيقوم بتطبيق الكود اللود
الموجود فى الزر طبقاً لما قمت انت بكتابته

فمثلاً فى الزر الاول كمثال
كود :
Me.Text = "Add"

وفى الزر الثاني كمثال
كود :
Me.Text = "Edit"

وتذكر ان يكون اعلى 
كود :
foorm2.Show()

تحياتى لك
وتمنياتى لك التوفيق



RE: يرجى المساعدة لحل مشكلة عند تشغيل نفس الفورم اكثر من مرة vb.net - ahmadpal - 04-11-18

اخي elgokr شكراً جزيلا لك على اهتمامك والرد على الاستفسار الخاص بي ولكن انا استخدم هنا خاصية MdiParent  يعني اريد ان يظهر الفورم داخل الكونتينر كيف يمكنني استدعاء كود من داخل الموديول ليعمل داخل الفورم عند الضغط على زر في الhome
واعذرني على اسلوبي ان كنت قد اخطأت وتقبل مني فائق الاحترام والتقدير


RE: يرجى المساعدة لحل مشكلة عند تشغيل نفس الفورم اكثر من مرة vb.net - elgokr - 04-11-18

مرفق مثال مصغر يوضح يفية اتمام المطلوب
تم انشاء فورم 1  خلاف الرئيسي كما تم انشاء عدد 3 زر
[اضافة - تعديل - حذف ]

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

مرفق السورس + برنامج لاختبار والمعينة

السورس (2015)

الاكواد المستخدمة فى الفورم
كود :
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim F2 As New Form2
       F2.MdiParent = Me

       F2.Text = "Add"
       F2.Show()
   End Sub

   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
       Dim F2 As New Form2
       F2.MdiParent = Me

       F2.Text = "Edit"
       F2.Show()
   End Sub

   Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
       Dim F2 As New Form2
       F2.MdiParent = Me

       F2.Text = "Delete"
       F2.Show()
   End Sub

فى خصائص الفورم الرئيسى Form1
تم تعديل الخيار
كود :
IsMdiContainer = True

حتى لا يتم خروج الفروم الفرعية خارج الفورم الرئيسي

تحياتى لك
وتمنياتى لك التوفيق



RE: يرجى المساعدة لحل مشكلة عند تشغيل نفس الفورم اكثر من مرة vb.net - ahmadpal - 04-11-18

اشكرك اخي جزيل الشكر واتمنى من الله تعالى ان ارد لك هذا الجميل وشكرا على وقتك الثمين الذي اهديتني اياه وعلى المجهود الذي قمت به 
لكن يبدو انني لا زلت اعاني من نفس المشكلة في الكود حيث اني قمت برفع نفس السورس الخاص بك واضفت عليه قاعدة بيانات اكسس وجدول واحد تجريبي 
بحيث حين اقوم بأي حدث على الفورم يقوم بالتغيير في جميع الفورمات 
مرة اخرى اشكر لك اهتمامك واعذرني ان كنت قد تسببت لك بمشاكل 
رابط السوركود مرفوع على الميديا فير
http://www.mediafire.com/file/f513pp38dquw9jc/testForm.rar/file