Тусклая ширина как двойник = (ListBox1.ActualWidth/3) до 2
Для каждого es как Employees_Structure в myEmp
'Создайте новый деталь ListBox для es
Затемните li как новое ListBoxItem
'Создайте панель стога
Затемните sp как новое StackPanel
sp. Ориентация = Orientation.Horizontal
sp.HorizontalAlignment = HorizontalAlignment.Stretch
'Создайте TextBlock для того чтобы установить info для колонки в ListBox
'одно для каждой колонки
Тусклое tb1 как новое TextBlock
tb1.Text = es.LastName
tb1.Width = ширина
Тусклое tb2 как новое TextBlock
tb2.Text = es.FirstName
tb2.Width = ширина
Тусклое tb3 как новое TextBlock
tb3.Text = es. Положение
tb3.Width = ширина
'Добавьте TextBox к панели стога
sp. Children.Add (tb1)
sp. Children.Add (tb2)
sp. Children.Add (tb3)
'Добавьте панель стога к деталю коробки списка
li. Содержание = sp
'Добавьте деталь коробки списка к коробке списка
ListBox1.Items.Add (li)
Затем
|