WPF VB.Net

  xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
  x:Class="WpfApplication1.IndexOfSample" 
  WindowTitle="UIElementCollection IndexOf Sample">
    
        
        What is the Index Number
            of the Element Just Added?
        
            Text 1
            Text 2
        
    

//File:Window.xaml.vb
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Documents
Namespace WpfApplication1
  Public Partial Class IndexOfSample
    Private Sub FindIndex(sender As Object, e As RoutedEventArgs)
      Dim newText As New TextBlock()
      MainDisplayPanel.Children.Add(newText)
      newText.Text = "New element #"
      DockPanel.SetDock(newText, Dock.Top)
      TxtDisplay.Text = MainDisplayPanel.Children.IndexOf(newText) + ""
    End Sub
  End Class
End Namespace