Bonjour,
J'ai une fenêtre qui contient un certain nombre de label. Mais ce nombre change en fonction de certaines données. Je ne sais donc pas combien je dois créer de label. J'aimerai que les labels se positionnent l'un après l'autre.
Pour cela je fais :
tab étant un tableau de Label.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 Dim TAB(1000) As Label Dim i As Integer = 0 For Each entry In ev.Entries EntType = entry.EntryType.ToString If EntType = "Error" Then TAB(i) = New Label TAB(i).Width = 433 TAB(i).Height = 32 If i = 0 Then TAB(i).Margin = New Thickness(189.5, 67.374, 9.5, 12) Else TAB(i).Margin = New Thickness(189.5, TAB(i - 1).Margin.Top + 32, 9.5,12) End If Me.LayoutRoot.Children.Add(TAB(i)) i += 1 End If Next
Cela ne fonctionne pas, je ne comprends pas pourquoi.
Partager