Création dynamiqe de textbox et labels
Bonjour,
Je dispose d'une listbox à choix multiples et je voudrais qu'une fois qu'on a sélectionné les valeurs souhaitées, cela crée dynamiquement dans un panel des labels et des textbox. Je m'explique:
Si par exemple dans la liste on a sélectionné les valeurs test1,test2 et test3 je voudrais créer dans mon panel:
test1 et a coté un textbox
test2 et a coté un textbox
test3 et a coté un textbox
Pour l'instant j'ai écris ceci qui est déclenché apres un clique sur un bouton:
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
|
Me.Panel2.Visible = True
Dim nbact As Integer
For i = 0 To Me.ListBox2.Items.Count - 1
If Me.ListBox2.Items.Item(i).Selected Then
nbact = nbact + 1
Dim lbl(i) As Label
lbl(i) = New Label
lbl(i).Text = Me.ListBox2.Items.Item(i).Text.ToString
lbl(i).Text = lbl(i).Text.Substring(lbl(i).Text.LastIndexOf("--") + 3)
End If
Next |
Le problème c'est que maintenant je ne sais pas comment ajouter mes labels dans mon panel ? Par la suite j'imagine qu'il suffit de faire pareil pour les textbox et ça devrait aller mais pour l'instant je suis bloqué.
Quelqu'un peut-il m'aider ? Merci
