For Each Status As Status In A.List grdList.RowDefinitions.Add(New RowDefinition() With {.Height = GridLength.Auto}) Dim TextBlock As New TextBlock() TextBlock.Margin = New Thickness(4) TextBlock.TextWrapping = TextWrapping.Wrap TextBlock.Inlines.Add(Status.Text) Grid.SetColumn(TexatBlock, 1) Grid.SetRow(TextBlock, grdList.RowDefinitions.Count - 1) grdList.Children.Add(TextBlock) Next
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)