WPF VB.Net

  xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
  xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
  xmlns:c="clr-namespace:DataTriggerSample"
  Title="DataTriggerSample" Height="300" Width="300">
  
    
    
      
        
          
        
        
          
        
        
          
            
            
          

          
            
          

        

      

    
    
      
        
        
      
    
  

  
    Data Trigger Sample
    
  


//File:Window.xaml.vb
Imports System
Imports System.Collections.Generic
Imports System.Text
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Data
Imports System.Windows.Documents
Imports System.Windows.Input
Imports System.Windows.Media
Imports System.Windows.Media.Imaging
Imports System.Windows.Shapes
Imports System.Collections.ObjectModel
Namespace DataTriggerSample
  Public Partial Class Window1
    Inherits System.Windows.Window
    Public Sub New()
      InitializeComponent()
    End Sub
  End Class
  Public Class Person
    Private _name As String
    Private _relationshipType As String
    Public Property Name() As String
      Get
        Return _name
      End Get
      Set
        _name = value
      End Set
    End Property
    Public Property RelationshipType() As String
      Get
        Return _relationshipType
      End Get
      Set
        _relationshipType = value
      End Set
    End Property
    Public Sub New(name As String, relationshiptype As String)
      Me._name = name
      Me._relationshipType = relationshiptype
    End Sub
  End Class
  Public Class People
    Inherits ObservableCollection(Of Person)
    Public Sub New()
      Add(New Person("A", "Friend"))
      Add(New Person("C", "Family"))
      Add(New Person("B", "Friend"))
    End Sub
  End Class
End Namespace