كيفية القيام بما يلي: قم بـتعريف المجموعات في الفئات الخاص بك
يمكنك إضافة مجموعة إلى أحد الفئات الخاصة بك لإدارة مجموعات من الكائنات التي تستخدمها الفئة الخاصة بك. إن أبسط طريقة للقيام بذلك هو إضافة متغير عام من نوع Collection إلى فئتك. خذ بعين الاعتبار فئة افتراضية تدعى widgetRepository التي تدير و تكشف كائنات widget . قد تقوم بإنشاء متغير widgetColl للإشارة إلى مجموعة widget , كما هو موضح في الإجراء التالي.
تعريف مجموعة بسيطة
لـتعريف مجموعة بسيطة في فئة
قم بـإنشاء متغير عام ليعمل كمجموعة للكائنات الخاصة بك.
Public Class widgetRepository Public widgetColl As New Microsoft.VisualBasic.Collection() ' Insert code to implement additional functionality. End Class
الـ فئة widgetRepository أصبحت الآن لديها مجموعة عامة حيث يمكنك إضافة كائنات widget. يمكنك حينئذ استخدام عبارة Visual Basic) For Each...Next) لمعالجة عناصر المجموعة كما توضح التعليمات البرمجية التالية.
For Each aWidget As widget In widgetColl ' Insert code to process widgetColl elements Next aWidget
الـمجموعة widgetColl المعرفة في المثال السابق لم تكن نوع بشدة، وهذا يعني أنه يمكنك إضافة أي نوع من الكائنات إليه، وليس فقط الكائنات widget . يؤدي هذا الأمر إلى مشاكل تأمين النوع. على سبيل المثال، افترض أن إضافة String لمجموعة كما في التعليمة البرمجية التالية.
Dim notWidget As String = "This is not a widget object!" widgetColl.Add(notWidget)
إذا قمت بهذا، التكرار الحلقي For Each في الإجراء السابق يطرح استثناء ArgumentException في وقت التشغيل بسبب عنصر لمجموعة ليس من النوع widget.
نوصي بتعريف فئة عامة عندما تريد التأكد من نوع الأمان. لمزيد من المعلومات وللحصول على مثال راجع كيفية القيام بما يلي: تعريف مجموعات نوع آمن.
راجع أيضًا:
المهام
كيفية القيام بما يلي: تعريف مجموعات نوع آمن