لنفترض أن لديك نموذجًا تستخدمه بشكل متكرر، على سبيل المثال، يوجد عنصر تحكم في التقويم في الزاوية العلوية اليسرى من النموذج. لتسهيل إنشاء هذا النوع من النماذج، يمكنك إنشاء مثيل وفقًا لاحتياجاتك، ووضع عنصر تحكم التقويم، وتعيين خصائصه، وما إلى ذلك.
ثم احفظ هذا النموذج في دليل القالب، مثل: C:Program FilesMicrosoft Visual StudioVb98TemplateForms.
الآن، حدد "إضافة نموذج" من قائمة المشروع، وسيظهر خيار للنموذج الذي قمت بإنشائه للتو. عند إضافة هذا النوع من النماذج، ستكون الخصائص التي تم تعيينها في الأصل موجودة أيضًا.
حول ملفات .FRX
ما هو الملف FRX؟ كيفية تحريرها؟ هل يمكن أن تعمل بدونهم؟
يحفظ Visual Basic المعلومات الثنائية في ملف FRX على سبيل المثال، إذا قمت بتعيين خصائص الرسم لنموذج في وقت التصميم، يقوم Visual Basic بحفظ الرسم في ملف FRX. إذا تم حذف ملف FRX في هذا الوقت، سيحدث خطأ عند فتح ملف المشروع مرة أخرى، وسيتم فقدان كافة المعلومات ذات الصلة.
إذا قمت باستبدال الخصائص الرسومية للنموذج في وقت التصميم، فسيقوم Visual Basic بإجراء التغييرات المقابلة في ملف FRX. ومع ذلك، تحرير ملفات FRX بشكل فردي غير مستحسن لأنه لا توجد طريقة حقًا.
لا يحدث شيء فعليًا بدون ملفات FRX هذه، إلا إذا كانت هناك حاجة لإعادة إنتاج المعلومات الثنائية في وقت التصميم، مثل ملفات الرسومات. يمكنك حفظ الرسومات والمعلومات الأخرى في ملف مورد واستدعائه في وقت التشغيل، أو يمكنك تخزين المعلومات بشكل منفصل واستدعائه في وقت التشغيل. لن تجلب لك هذه الطريقة المزيد من الفوائد، لأن هذه الملفات المنفصلة يجب أن تكون موجودة عند تشغيل البرنامج. على العكس من ذلك، إذا سمحت لـ Visual Basic بحفظ هذه المعلومات إلى ملف FRX، عند التحويل البرمجي والتشغيل، سيتم تضمين هذه المعلومات في ملف EXE منفصل.
تحديد ما إذا كان قد تم تحميل النموذجيمكنك استخدام مجموعة نماذج لتحديد ما إذا كان قد تم تحميل نموذج باسم معين أم لا. الطريقة هي: التكرار عبر مجموعة النماذج ومقارنة ما إذا كان كل عنصر يتطابق مع الاسم الهدف:
ملاحظة: قم بإرجاع نموذج بالاسم إذا تم تحميله.
وظيفة خاصة FindForm (ByVal form_name كسلسلة) كنموذج
خافت ط كعدد صحيح
ملحوظة: لنفترض أننا لن نجده.
تعيين FindForm = لا شيء
ملاحظة: ابحث في النماذج المحملة.
لأن i = 0 إلى Forms.Count - 1
إذا Forms(i).Name = form_name إذن
التعليق: وجدنا ذلك.
تعيين FindForm = النماذج (i)
الخروج ل
نهاية إذا
التالي ط
وظيفة النهاية
لماذا لا يظهر النموذج في شريط المهام؟عند تصحيح الأخطاء وتشغيلها في البرمجة، يتبين أحيانًا أن النموذج لا يظهر في شريط المهام، ما هو السبب؟ تشمل الأسباب المحتملة ما يلي:
1. تم ضبط ShowInTaskBar على False
2. النموذج هو نموذج فرعي MDI
3. BorderStyle للنموذج عبارة عن مربع حوار ذو حجم ثابت
4. BorderStyle للنموذج هو ToolWindow ذو حجم ثابت.
5. BorderStyle للنموذج هو ToolWindow متغير الحجم.