//A celebrity with a name and a picture
internal class Celebrity : INotifyPropertyChanged
{
    private string m_szName;
    private string m_szImageUri;

    public event PropertyChangedEventHandler PropertyChanged;

    public Celebrity(string name, string imageUri)
    {
        m_szName = name;
        m_szImageUri = imageUri;
    }

    public string Name
    {
        get { return m_szName; }
        set
        {
            if (m_szName != value)
            {
                m_szName = value;
                OnPropertyChanged("Name");
            }
        }
    }

    public string ImageUri
    {
        get { return m_szImageUri; }
    }

    public ImageSource Image
    {
        get
        {
            Uri uri = new Uri("pack://application:,,,/Images/Celebrities/" + m_szImageUri);
            return new BitmapImage(uri);
        }
    }

    private void OnPropertyChanged(string name)
    {
        PropertyChangedEventHandler handler = PropertyChanged;
        if (handler != null)
        {
            handler(this, new PropertyChangedEventArgs(name));
        }
    }
}

//A celebrity category with a name, an icon and a list of celebrities
internal class CelebrityCategory : INotifyPropertyChanged
{
    private string m_szName;
    private string m_szImageUri;
    private Celebrity[] m_Celebrities;

    public event PropertyChangedEventHandler PropertyChanged;

    public CelebrityCategory(string name, string imageUri, Celebrity[] celebrities)
    {
        m_szName = name;
        m_szImageUri = imageUri;
        m_Celebrities = celebrities;
    }

    public string Name
    {
        get { return m_szName; }
        set
        {
            if (m_szName != value)
            {
                m_szName = value;
                OnPropertyChanged("Name");
            }
        }
    }

    public string ImageUri
    {
        get { return m_szImageUri; }
        set { m_szImageUri = value; }
    }

    public ImageSource Image
    {
        get
        {
            Uri uri = new Uri("pack://application:,,,/Images/" + m_szImageUri);
            return new BitmapImage(uri);
        }
    }

    public Celebrity[] Celebrities
    {
        get
        {
            return m_Celebrities;
        }
    }

    private void OnPropertyChanged(string name)
    {
        PropertyChangedEventHandler handler = PropertyChanged;
        if (handler != null)
        {
            handler(this, new PropertyChangedEventArgs(name));
        }
    }
}

'A celebrity with a name and a picture
Friend Class Celebrity
    Implements INotifyPropertyChanged
    Private m_szName As String
    Private m_szImageUri As String

    Public Event PropertyChanged As PropertyChangedEventHandler

    Public Sub New(name As String, imageUri As String)
        m_szName = name
        m_szImageUri = imageUri
    End Sub

    Public Property Name() As String
        Get
            Return m_szName
        End Get
        Set
            If m_szName <> value Then
                m_szName = value
                OnPropertyChanged("Name")
            End If
        End Set
    End Property

    Public ReadOnly Property ImageUri() As String
        Get
            Return m_szImageUri
        End Get
    End Property

    Public ReadOnly Property Image() As ImageSource
        Get
            Dim uri As New Uri("pack://application:,,,/Images/Celebrities/" & m_szImageUri)
            Return New BitmapImage(uri)
        End Get
    End Property

    Private Sub OnPropertyChanged(name As String)
        Dim handler As PropertyChangedEventHandler = PropertyChanged
        RaiseEvent handler(Me, New PropertyChangedEventArgs(name))
    End Sub
End Class

'A celebrity category with a name, an icon and a list of celebrities
Friend Class CelebrityCategory
    Implements INotifyPropertyChanged
    Private m_szName As String
    Private m_szImageUri As String
    Private m_Celebrities As Celebrity()

    Public Event PropertyChanged As PropertyChangedEventHandler

    Public Sub New(name As String, imageUri As String, celebrities As Celebrity())
        m_szName = name
        m_szImageUri = imageUri
        m_Celebrities = celebrities
    End Sub

    Public Property Name() As String
        Get
            Return m_szName
        End Get
        Set
            If m_szName <> value Then
                m_szName = value
                OnPropertyChanged("Name")
            End If
        End Set
    End Property

    Public Property ImageUri() As String
        Get
            Return m_szImageUri
        End Get
        Set
            m_szImageUri = value
        End Set
    End Property

    Public ReadOnly Property Image() As ImageSource
        Get
            Dim uri As New Uri("pack://application:,,,/Images/" & m_szImageUri)
            Return New BitmapImage(uri)
        End Get
    End Property

    Public ReadOnly Property Celebrities() As Celebrity()
        Get
            Return m_Celebrities
        End Get
    End Property

    Private Sub OnPropertyChanged(name As String)
        Dim handler As PropertyChangedEventHandler = PropertyChanged
        RaiseEvent handler(Me, New PropertyChangedEventArgs(name))
    End Sub
End Class