Hierarchical Binding for three level nested objects : Binding « Windows Presentation Foundation « VB.Net Tutorial

1. VB.Net Tutorial
2. Windows Presentation Foundation
3. Binding

<Window x:Class="WpfApplication1.Window1"
  xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
  xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
  Title="HierarchicalBinding" xmlns:local="clr-namespace:WpfApplication1">
  <Window.Resources>
    <local:Companies x:Key="Companies">
      <local:Company CompanyName="CompanyA">
        <local:Company.Members>
          <local:People>
            <local:Employee Name="EmployeeA" Age="21">
              <local:Employee.Comments>
                <local:Comments>
                  <local:Comment Description="Comment1" />
                  <local:Comment Description="Comment2" />
                  <local:Comment Description="Comment3" />
                </local:Comments>
              </local:Employee.Comments>
            </local:Employee>
            <local:Employee Name="Moe" Age="22" >
              <local:Employee.Comments>
                <local:Comments>
                  <local:Comment Description="Nice" />
                  <local:Comment Description="Comment3" />
                </local:Comments>
              </local:Employee.Comments>
            </local:Employee>
            <local:Employee Name="Curly" Age="23" >
              <local:Employee.Comments>
                <local:Comments>
                  <local:Comment Description="Comment6" />
                  <local:Comment Description="Comment3" />
                </local:Comments>
              </local:Employee.Comments>
            </local:Employee>
          </local:People>
        </local:Company.Members>
      </local:Company>
      <local:Company CompanyName="CompanyB">
        <local:Company.Members>
          <local:People>
            <local:Employee Name="EmployeeB" Age="135" >
              <local:Employee.Comments>
                <local:Comments>
                  <local:Comment Description="Comment8" />
                  <local:Comment Description="Comment7" />
                  <local:Comment Description="Comment5" />
                </local:Comments>
              </local:Employee.Comments>
            </local:Employee>
            <local:Employee Name="EmployeeC" Age="121" >
              <local:Employee.Comments>
                <local:Comments>
                  <local:Comment Description="Comment8" />
                  <local:Comment Description="Pale" />
                  <local:Comment Description="Comment4" />
                </local:Comments>
              </local:Employee.Comments>
            </local:Employee>
            <local:Employee Name="EmployeeD" Age="137" >
              <local:Employee.Comments>
                <local:Comments>
                  <local:Comment Description="Comment8" />
                  <local:Comment Description="Comment6" />
                  <local:Comment Description="Comment3" />
                </local:Comments>
              </local:Employee.Comments>
            </local:Employee>
          </local:People>
        </local:Company.Members>
      </local:Company>
    </local:Companies>

    <HierarchicalDataTemplate DataType="{x:Type local:Company}"
      ItemsSource="{Binding Path=Members}">
      <TextBlock Text="{Binding Path=CompanyName}" />
    </HierarchicalDataTemplate>

    <HierarchicalDataTemplate DataType="{x:Type local:Employee}"
      ItemsSource="{Binding Path=Comments}">
      <TextBlock>
        <TextBlock Text="{Binding Path=Name}" />
        (age: <TextBlock Text="{Binding Path=Age}" />)
      </TextBlock>
    </HierarchicalDataTemplate>

    <DataTemplate DataType="{x:Type local:Comment}">
      <TextBlock Text="{Binding Path=Description}" />
    </DataTemplate>

  </Window.Resources>

  <TreeView DataContext="{StaticResource Companies}">
    <TreeViewItem ItemsSource="{Binding}" Header="Companies" />
  </TreeView>
</Window>

//File:Window.xaml.vb

Imports System
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Data
Imports System.Windows.Documents
Imports System.Windows.Media
Imports System.Windows.Shapes
Imports System.Collections.ObjectModel


Namespace WpfApplication1

  Public Class Comment
    Private m_description As String
    Public Property Description() As String
      Get
        Return m_description
      End Get
      Set
        m_description = value
      End Set
    End Property
  End Class

  Public Class Comments
    Inherits ObservableCollection(Of Comment)
  End Class

  Public Class Employee
    Private m_name As String
    Public Property Name() As String
      Get
        Return m_name
      End Get
      Set
        m_name = value
      End Set
    End Property

    Private m_age As Integer
    Public Property Age() As Integer
      Get
        Return m_age
      End Get
      Set
        m_age = value
      End Set
    End Property

    Private traits As Comments
    Public Property Comments() As Comments
      Get
        Return traits
      End Get
      Set
        traits = value
      End Set
    End Property
  End Class

  Public Class People
    Inherits ObservableCollection(Of Employee)
  End Class

  Public Class Company
    Private familyName As String
    Public Property CompanyName() As String
      Get
        Return familyName
      End Get
      Set
        familyName = value
      End Set
    End Property

    Private m_members As People
    Public Property Members() As People
      Get
        Return m_members
      End Get
      Set
        m_members = value
      End Set
    End Property
  End Class

  Public Class Companies
    Inherits ObservableCollection(Of Company)
  End Class

  Public Partial Class Window1
    Inherits Window
    Public Sub New()
      InitializeComponent()
    End Sub
  End Class
End Namespace

16.95.Binding
	16.95.1.	Bind to a Property of a UI Element
	16.95.2.	Bind a Property of an Element to Itself
	16.95.3.	Specify a Default Value for a Binding
	16.95.4.	Create a Two-Way Binding
	16.95.5.	Debug Bindings Using Attached Properties
	16.95.6.	String Array Resource
	16.95.7.	Bind animate target value to Canvas(Window) width
	16.95.8.	Display Current Date and Time: binding the DateTime.Now to Label
	16.95.9.	One way and two way binding
	16.95.10.	Custom Element Binding Window
	16.95.11.	Get XmlElement from Bounded view
	16.95.12.	Customize UpdateSourceExceptionFilter
	16.95.13.	Assign your own class to DataContent and bind to TextBox
	16.95.14.	Async binding
	16.95.15.	Null property binding
	16.95.16.	Binding Property with Exception
	16.95.17.	Hierarchical Binding for three level nested objects
	16.95.18.	BindingOperations.GetBindingExpression
	16.95.19.	Bind to enum types
	16.95.20.	Bind to a Method
	16.95.21.	Manual Update Target
	16.95.22.	Bind to the Values of an Enumeration
	16.95.23.	Master Detail Binding
	16.95.24.	Data binding using collections composed of mixed types of data.
	16.95.25.	Binding Environment Info
	16.95.26.	Bind to an ADO.NETDataSet
	16.95.27.	Text Data Binding
	16.95.28.	Bind to an Existing Object Instance
	16.95.29.	Digital Clock
	16.95.30.	Use Data Triggers to Change the Appearance of Bound Data