Mega Code Archive
Use DataTemplate in ListBox
//File:Window.xaml.vb
Imports System.Collections.ObjectModel
Imports System.Windows
Imports System.Windows.Threading
Namespace WpfApplication1
Public Partial Class Window1
Inherits Window
Private numberDescriptions As ObservableCollection(Of String)
Public Sub New()
InitializeComponent()
End Sub
Private Sub Window_Loaded(sender As Object, e As RoutedEventArgs)
numberDescriptions = New ObservableCollection(Of String)()
listBox.ItemsSource = numberDescriptions
Me.Dispatcher.BeginInvoke(DispatcherPriority.Background, New LoadNumberDelegate(AddressOf LoadNumber), 1)
End Sub
Private Delegate Sub LoadNumberDelegate(number As Integer)
Private Sub LoadNumber(number As Integer)
numberDescriptions.Add("Number " & number.ToString())
Me.Dispatcher.BeginInvoke(DispatcherPriority.Background, New LoadNumberDelegate(AddressOf LoadNumber), System.Threading.Interlocked.Increment(number))
End Sub
End Class
End Namespace