[Listview][VB.Net] Comment implementer une édition ?

Bonjour

J'ai 5 Textbox vides dans lesquelles je remplis differentes informations

Ensuite 3 possibilités s'offrent a moi : Ajouter, Supprimer ou Editer.

Si je clique sur Ajouter, les informations que j'ai rentré dans les Textbox
seront implémentés dans une Listview sur une ligne.

Si je clique sur Supprimer après avoir cliqué sur la ligne voulue, la ligne
en question sera supprimée du Listview

Si je clique sur Editer après avoir cliqué sur la ligne voulue, cela doit
ouvrir une nouvelle fenetre dans laquelle j'ai 5 Textbox avec les informations de la ligne remplie. Je n'ai donc plus qu'à changer les
informations , cliquer sur Ok et la ligne est éditée.

J'ai déja developpé les boutons Ajouter et Supprimer, mais je bloque
pour Editer. Comment faire ?

merci

Dans le bouton editer de ta première feuille tu mets :

Code:

---

1 2 3 4 5

Form2.Text1 = ListView1.SelectedItem.Text Form2.Text2 = ListView1.SelectedItem.SubItems(1) Form2.Text3 = ListView1.SelectedItem.SubItems(2) '...

---

et dans le bouton OK de la deuxième :

Code:

---

1 2 3 4 5

Form1.ListView1.SelectedItem.Text = Text1.Text Form1.ListView1.SelectedItem.SubItems(1) = Text2.Text Form1.ListView1.SelectedItem.SubItems(2) = Text3.Text '...

---

Après à toi de tester la viabilité des données saisies, ...

Salut merci pour ta réponse

J'ai réussi pour le bouton editer , les informations sont bien transmises
mais pour le bouton Ok je bloque, je n'arrive pas à renvoyer les
informations modifiées vers le Listview.

Voila mon code pour le bouton editer :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

Dim EditContact As New EditContact Dim selCol As ListView.SelectedListViewItemCollection Dim selColItem As ListViewItem   selCol = Me.ListClientInfoContact.SelectedItems EditContact.TextBox1.Text = selCol.Item(0).Text For Each selColItem In selCol Try EditContact.TextBox2.Text = selColItem.SubItems(1).Text EditContact.TextBox3.Text = selColItem.SubItems(2).Text EditContact.TextBox4.Text = selColItem.SubItems(3).Text EditContact.TextBox5.Text = selColItem.SubItems(4).Text EditContact.TextBox6.Text = selColItem.SubItems(5).Text EditContact.TextBox7.Text = selColItem.SubItems(6).Text Catch ex As Exception End Try Next

---

EditContact étant le Form qui apparait après avoir cliqué sur le bouton
Editer
ListClientInfoContact etant le Listview

voila merci

C'est bon j'ai resolu moi meme merci