استدعاء فورم بعد الضغط على زر الإغلاق

السلام عليكم

تحيرت ولم أفهم السؤال

طيب انت اكتب الكود تبعك

اتوقع انك بتكتب form1.close

السلام عليكم

أعتقد أن مشكلتكِ أختي في form1.show

خليها Form1.ShowDialog()

ما أدري هل ها هو المقصود ؟؟

إخواني ,, شكرا لكم ,,,

أقصد من المشكلة ,, أنه لدي فورمين ,, Form1 و Form2 ,,,

في فورم1 عرفت كائن من نوع فورم2

dim f2 as new form2

لدي زر btn1 في فورم1 فيه الكود

f2.ShowDailog(Me)

وفي فورم2 لدي صندوق نص يتم إدخال بيانات فيه وزر btn2 ,,,

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

الكود في btn2

If txt1.Text = "arabteam2000" then
valid1 = "ok"
me.hide
End If

طبعا valid1 متغير معرف في موديول ,, وهناك زر آخر cancel ,, يعمل على إخفاء الفورم2 دون إسناد أي قيمة للمتغير valid1

حسناً المشكلة عند تشغيل البرنامج ,, نكون في فورم1 نضغط على الزر يظهر الفورم2 ,, وعند العمل على الضغط على أحد الزرين لا مشكلة ,, ولكن عند الضغط على زر الإغلاق للفورم2 ,, نعود لفورم1 وعند الضغط على الزر في فورم1 تطلع رسالة الخطأ ,,,

أريد حلاً لهذه المشكلة ,, عند الضغط على زر الإغلاق في فورم2 لايحصل له Unload ولا ينتهي من الذاكرة ,, أو أننا نستطيع عند استدعائه مرة أخرى أن نعمل له Loading من جديد ,,

اتمنى أني أوضحت ماأريد ,,

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

إخوتي الكرام في هذا المنتدى ,,

هداني الله أخيراً إلى وصلة لتحميل كتاب الذي كنت طالما أبحث عنه وهو

Sybex Mastering Visual basic .NET

وبهذا سأحاول أن أقلل إزعاجي وأسئلتي ,, وبعون الله أجد مواضيع مفيدة أستطيع طرحها بين ايديكم ,,

توصلت إلى الحلول التي طلبت في هذه المشاركة ,,

الحل الأول هو منع الفورم من الإغلاق ,, وهذا يفيد المستخدم قليل الانتباه عندما يغلق فورم ويريد العودة إليه ولكن يكتشف أنه قد أضاع بياناته ,,

من بين الطرق هو إظهار رسالة تأكيد إغلاق ,,

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

أما النوافذ الأخرى فنقوم بتعطيل عملية الإغلاق بالكود التالي :

نفرض أن اسم الفورم هو form2

Private Sub form2_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        e.Cancel = True
        Me.Hide()
End Sub

وهكذا بدل الإغلاق يجب يقوم الفورم بالاختباء لحين استدعاؤه للمرة التالية ,, رغم وجود أزرار مثل ,, Back to Main ,, و cancel ,, و exit ,, إلى أن المستخدم يجب إغلاق الفورم بالطريقة غير الاعتيادية ,, عدم الضغط على الزر المتاح بل على زر الإغلاق القابع في الركن العلوي من الواجهة ,, وإذا لم يوجد كود لتلافي الأضرار والأخطاء يحدث مالا يحمد عقباه ويتصف البرنامج بالضعف ,,

الحل التالي هو إنشاء نسخة جديدة من الفورم2 New Instance ,, مع احتمال وجود نسخة سابقة مختبأة ,, لأننا لانستطيع أن نتنبأ ماسيفعله المستخدم في كل مرة ,, لا نستطيع الجزم أنه في كل مرة سيغلق الفورم ولن يلجأ إلى إخفاؤه ,, ولتلافي خطأ تكوين عدة نسخ من الفورم ,, وتحميل ذاكرة فوق طاقتها ,, نستخدم جملة حاول Try لتجنب أي أخطاء ,,

Windows Form designer generated code
'عرف الفورم2 هنا
Dim f2 As New Form2

'ثم في كود زر استدعاء الفورم وليكن اسمه btn1
Private Sub btn1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn1.Click
        Try
            f2.ShowDialog(Me)
        Catch
            Dim f2 As New Form2
            f2.ShowDialog(Me)
        End Try
End Sub

مثال توضيحي مرفق

وبالله التوفيق ,,, :rolleyes:

FormShowTest.rar