WPF VB.Net

     xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
     xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml">
  
    
      
        
          
          
          
        
      

    
    
      
        
          
        
        
          
            
            
          

          
        

      

    
    
      
        
      
    
  

  
               ItemContainerStyle="{StaticResource MyContainer}" 
           SelectionChanged="mySelectionChanged"
           SelectionMode="Single" 
           Name="myPlaylist">
      
        
          
          
          
        

      

    
    
  


//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.Windows.Controls.Primitives
Imports System.Collections.ObjectModel
Imports System.Xml
Namespace WpfApplication1
  Public Partial Class Window1
    Inherits Window
    Private Sub mySelectionChanged(sender As Object, e As SelectionChangedEventArgs)
      Dim mySelectedElement As XmlElement = DirectCast(myPlaylist.SelectedItem, XmlElement)
      NowPlaying.Text = mySelectedElement.GetAttribute("Name").ToString() & " by " & mySelectedElement.GetAttribute("Artist").ToString()
    End Sub
  End Class
End Namespace