[تنبيه - عنوان غير مناسب : ]هذا مشروعي .. أرجو المساعده ..!

ما هو الأسلوب المستخدم لإغلاق البرنامج ؟

هل هو End ام Unload frmName أم frmName.Hide ؟؟

وعندي بالمناسبة ملاحظة , على سطح مكتبك , وهي تخفيف الأيقونات التي عليه

لأنك لم تغلق كافة الملفات المفتوحة داخل برنامجك أو المكتبات ، علي سبيل المثال لم تغلق قاعدة البيانات أو الكائن Cn !!!

حيث من الطبيعي أنك تقم بإدراج أمر Cn.Close في حدث Unload للنموذج الرئيسي Main ، وبعد ذلك تضيف جملة End لإنهاء أي شيء آخر مفتوح . كما انه يجب عليك إغلاق أي مكتبة مفتوحة أو أي كائن مفتوح بإستخدام الأمر Nothing ، أنظر ما يلي :

Private Sub Form_Unload()
	Cn.Close
	Set Cn = Nothing
	End
End Sub

أما بخصوص النماذج الوليدة أو الفرعية يجب عليك في حدث Unload لكل نموذج تقم بإغلاق أي ملف جدول مفتوح بإستخدام الكائن الـ Recordset . ويجب أن تعلم أن ليس من الصحيح عند النقر علي زر ( × ) الموجود بأعلي النافذة لي يقم بإغلاق النموذج ، وأحياناً جملة Unload و Hide لا توفي بذلك ، وتظر مفتوحة بالذاكرة Memory ، لذلك يجب التأكد من مسحها من الذاكرة ، أنظر الكود التالي :

Rs.Close
Set Rs = Nothing
Set Form1 = Nothing

جرب ما ذكرتة لك وستعلم ما المشكلة بالضبط

اقتباس

وعندي بالمناسبة ملاحظة , على سطح مكتبك , وهي تخفيف الأيقونات التي عليه

نصيحة غالية جداً ، حيث أن كثرة الأيقونات علي سطح المكتب ، والسيرفرات المفتوحة تؤدي الي حدوث بطء لجهازك الشخصي ( شكراً Ala2 VB )

شكراً

العنوان غير مناسب

الرجاء اختيار عنوان مناسب أكثر في مواضيعك القادمة، وهذا بمثابة إشعار للأهمية.

وفي حال التكرار سيتعرض موضوعك للإغلاق والحذف!!!

قواعد المشاركة

/index.php?showtopic=29343

أخوي .. Ala2 VB .. شكراً ..!!

أخوي .. MMA_EG_Cairo .. الله يعطيك العافية .. انتهت المشكله ..!!

أخوي .. HnHn .. آسف ..!!