Comment obtenir toutes les valeurs sélectionnées dans une zone de liste à sélection multiple en vb6?

J'ai une zone de liste sur mon projet vb6 et j'ai mis sa propriété multiselect.
Maintenant, je veux obtenir tous les éléments sélectionnés sur ma zone de liste à sélection multiple et le mettre dans une variable par exemple, ou peut-être sur une zone de texte multiligne. Je voulais juste avoir la multiselected valeurs.

OriginalL'auteur kimbebot | 2012-03-06

  1. 9

    Malheureusement, vous devez effectuer une boucle sur tous les éléments. Voici un exemple de code:

    Dim k As Long
Dim s As String

For k = 0 To List1.ListCount - 1
    If List1.Selected(k) Then
        s = List1.List(k)
        ' ... do something
    End If
Next
    Maintenant, c'est ce que je suis à la recherche pour. Merci!

    OriginalL'auteur MicSim