Public Class ProductBusinessEntity
    Inherits EPS.Business.BusinessObjects.BusinessEntity

    Private colImages As ProductImagesCollection = Nothing 

    Public ReadOnly Property ProductImages() As ProductImagesCollection
        Get
            Return Me.colImages
        End Get
    End Property

    Protected Overrides Sub LoadSubItemCollections()
        Me.colImages = New ProductImagesCollection(Me)
        Me.colImages.SetTable(Me.dsInternal.Tables("productimages"))
    End Sub

    ' Rest of class continues as in the previous example

Back to Making the Main Entity Aware of the Sub Items