إزالة الفورم من الذاكرة

أولا - أدعوك بحرارة لقراءة قواعد المشاركة قبل كتابة أي موضوع آخر كما أرجو الالتزام التام والدقيق بها

مثلا - عنوان موضوعك مخالف لقواعد المشاركة - لايدل على محتوى الموضوع

ثانيا - غالبا هذا السؤال قد طرح سابقا إن كنت أذكر جيدا فيرجى استخدام محرك بحث المنتدى قبل طرح أي موضوع في المرات القادمة

ثالثا - جواب سؤالك رغم اعتراضك هو استخدم me.close ولا داعي لاستخدام unload في الدوت نيت فبعد إنهاء البرنامج يقوم مايسمى بـ GC أو Garbage Collector في الدوت نيت بالتخلص من الأشياء Objects الموجودة في الذاكرة والتي تم الإنتهاء من استخدامها وإن كنت مصرا على عمل ذلك بنفسك مع أنه في معظم الحالات لاداعي له استخدم العبارة Me.Dispose() بعد Me.Close()

	   Me.Close()
	   Me.Dispose()

الاخ samerselo مشكور على ردك

لكن الكود Me.Dispose() لم ينفع

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

انتظر ردك ياخ samerselo

الاخ samerselo مشكور على ردك

لكن الكود Me.Dispose() لم ينفع

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

انتظر ردك ياخ samerselo

جوابي كان بناء على سؤالك أعتقد أن جواب سؤالك بالمرفقات

وطريقة عمله كالتالي

نستدعي النموذج باستخدام ShowDialog ثم نختبر القيمة باستخدام DialogResult ونقوم بالمعالجة بناء على القيمة المعادة منها مثلا

	   Form2.ShowDialog()

		Select Case Form2.DialogResult

			Case Windows.Forms.DialogResult.OK
				Me.TextBox1.Text = Windows.Forms.DialogResult.OK.ToString
				Form3.Show()

			Case Windows.Forms.DialogResult.Cancel
				Me.TextBox1.Text = Windows.Forms.DialogResult.Cancel.ToString

		End Select

وفي النافذة التي استدعيناها يكفي اسناد قيمة لـ DialogResult للنافذة حتى يتم إغلاقها

مثلا زر Ok نكتب فيه بعد ما نقوم بالانتها للمعالجة

		' نضع أي كود نحتاجه للمعالجة
		' ثم نسند قيمة لإغلاق النافذة
		Me.DialogResult = Windows.Forms.DialogResult.OK

و زر Cancel يمكن استخدامه بنفس الطريقة

		' نضع أي كود نحتاجه للمعالجة
		' ثم نسند قيمة لإغلاق النافذة
		Me.DialogResult = Windows.Forms.DialogResult.Cancel

WindowsApplication11.rar

عرض جيد أخى samerselo

لكن يبدو انك سهوت عند عرض Cancel

وهى نقلاً عن مشروعك المرفق

 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
		Me.DialogResult = Windows.Forms.DialogResult.Cancel
	End Sub

الاخ samerselo والاخ bedoonline

لقد تم حل المشكلــــــــــــــــــــة بنجاح

شكــــــــــــــــــــــــــــــــــــــــــــــــــــــــرا لكم على المساعدة

بالتوفيق دائما و الى المزيد

أخ Admin_sys يسعدني أنك حليت المشكلة

أخ bedoonline

bedoonline كتب:

عرض جيد أخى samerselo

لكن يبدو انك سهوت عند عرض Cancel

وهى نقلاً عن مشروعك المرفق

 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
		Me.DialogResult = Windows.Forms.DialogResult.Cancel
	End Sub

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