Changer la value du dernier element ajouté à une listbox

Bonjour,

J'ai un For Each qui me permet d'alimenter une listbox :

Code:

---

1 2 3 4

For Each Element In Elements Devis_Liste.Items.Add(Element("Tiers").ToString()) 'Devis_Liste.Items().FindByText(Element("Tiers").ToString()).Value() = Element("Title").ToString() Next

---

Je cherche à changer la value de l'item que je suis en train d'inserer

Ma ligne en commentaire fonctionne mais je trouve ça un peu "crade".

Une idée ? Merci de votre aide.

Le débutant...

Fallait faire :

Code:

---

1 2 3 4 5 6

For Each Element In Elements Dim Item As ListItem = New ListItem Item.Text = Element("Tiers").ToString() Item.Value = Element("Title").ToString() Devis_Liste.Items.Add(Item) Next

---