Discussion :

[Skice]

Bonjour,

C'est pas dans mon habitude de prendre le chemin de facilité mais là je suis en trin de devenir chauve ^^. Je vous explique :

Je souhaite remplir une listbox à partir d'une autre listbox et d'un textbox. Le problème c'est que je ne vois pas comment faire pour récupèrer tout les valeurs qui se trouvent dans ma première listbox et contaténer pour chacune de ces valeurs mon textbox et enfin l'ajouter dans une listbox.

Par exemple : mon textbox contient PGMI201- et les valeurs dans ma listbox sont 1 2 3 4 5 etc ... et donc je souhaiterai obtenir dans ma nouvelle listbox PGMI201-1 PGMI201-2 etc

Quelqu'un pourrait m'aider s'il vous plaît parce que j'ai beau chercher je ne trouve pas comment faire. J'ai vu que beaucoup parle d'utiliser la fonction SelectedIndices des ListBox mais chez moi y'as pas cette fonction. Je suis sous Visual Basic 2010 Express.

Merci d'avance
En attente de vos réponse, je vais continuer mes recherches

[Gurdil le nain]

Un simple parcours (avec un foreach, par exemple) de ta listBox, où tu concatènes et ajoutes dans l'autre listBox devrait suffire pour avoir toutes tes valeurs non ?

Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
For Each item as String in listBox1.Items
   listBox2.Items.add(txtBox.text & item)
Next

[Skice]

j'y avais pensé. Je vous met mon code que j'avais trouvé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub MachineFinal_SelectionChanged(ByVal sender As Object, ByVal e As System.Windows.Controls.SelectionChangedEventArgs) Handles MachineFinal.SelectionChanged
        For Each element As String In ListMachineP.Items
            MachineFinal.Items.Add(NomMachine.Text & "-" & element)
        Next
    End Sub

Mais lorsque je lance mon appli rien ne se passe

[youtpout978]

c'est normal que tu fait ça sur l'événement selectionchanged de la listbox que tu veux remplir?

[Skice]

J'ai essayé sur les deux mais rien ne se passe quoiqu'il arrive donc j'ai laissé mon dernier test

[Skice]

Avec ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub MachineFinal_LayoutUpdated(ByVal sender As Object, ByVal e As System.EventArgs) Handles MachineFinal.LayoutUpdated
        For Each element As String In ListMachineP.Items
            MachineFinal.Items.Add(NomMachine.Text & "-" & element)
        Next
    End Sub

J'arrive à avoir un affichage mais il n'attends pas la sélection non seulement dans une combobox (pour complèter le nom) mais aussi dans la listbox

[youtpout978]

tu ajoutes un boutton pour effectuer cette action et sur l'événement click de ton boutton tu peuple ton second liste box avec le code que tu as déja marqué

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
For Each element As String In ListMachineP.Items
            MachineFinal.Items.Add(NomMachine.Text & "-" & element)
        Next