[silverlight]

هذا ما أقصده بإستخدام كلاس للمعلومات و استخدامه مع Collection
و ممكن تضيف له الكثير من المدخلات مثل اللون الذي تريد به ان يتم ظهور البيانات مثلا و نوع الفونت و الكثير من تلك الاشياء

الشكل العام للكلاس سيكون هكذا

كود :

Public Class DataStore
        Public Sub New()
            Me.New(Nothing, Nothing, Nothing, Nothing, CType(Nothing, Image))
        End Sub

        Public Sub New(group As String, author As String, description As String, Additional As String, cover As Image)
            Me.Group = group
            Me.Author = author
            Me.Description = description
            Me.AdditionalData = Additional
            Me.Cover = cover
        End Sub

        Public Group As String
        Public Property Author As String
        Public Property Description As String
        Public Property AdditionalData As String
        Public Property Cover As Image

    End Class

و الكود التالي يوضح كيفية بناء Collection من هذا الكلاس مع كيفية ادخال البيانات الي Collection

كود :

' هنا أنا أضفت بيان واحد فقط الي الكولكشن و بدون صورة
    Private StoreDataList As List(Of DataStore) = New List(Of DataStore) From {New DataStore("Math", "Mohamed Ahmed", "this book talk about", "Additional information comes here", Nothing)}