bonjour,

Code : Sélectionner tout - Visualiser dans une fenêtre à part
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

Comment l'ecrire plus simplement ?
Merci