Comment ecrire le code plus simplement ?

bonjour,

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub ListView1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListView1.SelectedIndexChanged Dim L As Integer For L = 0 To ListView1.Items.Count - 1 If ListView1.Items(L).Selected = True Then TextBox1.Text = ListView1.Items(L).Text End If Next L   End Sub

---

Ce code fonctionne
:oops:
Comment l'ecrire plus simplement ?
Merci

Peut-être par

Code:

---

1 2 3 4 5

Private Sub ListView1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListView1.SelectedIndexChanged   TextBox1.Text = ListView1.SelectedValue   End Sub

---