je cherche comment récupérer sous vb6 à récupérer les valeurs
sélectionnées dans une listbox a choix multiple afin de traiter ces
valeurs....
J'ai essayer avec listbox1.text, mais cette propriété ne marche pas,
elle renvoie toujours la même valeurs celle située la plus en bas dans
la listbox.....
Bonsoir,
Tu places deux ListBox et un CommandButton sur ta Form.
Private Sub Form_Load()
' Déclare la variable.
Dim I
' Remplit la zone de liste à l'aide des noms des
' polices d'écran.
For I = 0 To Screen.FontCount - 1
List1.AddItem Screen.Fonts(I)
Next I
End Sub
Private Sub Command1_Click()
' Déclare la variable.
Dim I
' Efface tous les éléments contenus dans la liste.
List2.Clear
' Si un élément est sélectionné, l'ajoute à List2.
For I = 0 To List1.ListCount - 1
If List1.Selected(I) Then
List2.AddItem List1.List(I)
End If
Next I
End Sub
Je vien de trouver la propriété adéquate c'est list(entier)
listbox.list(3) renvoi le 3eme element de la listbox. Par contre avec
listbox.text ca renvoi le dernier element selectionné meme si tu en as
2-3-4.. selectionné.
Salut,
Petite précision
La propriété List est un tableau donc tu peux l'utiliser en tant que tel
Teste ce bout de code pour t'en rendre compte
Il te faut une zone de liste et un bouton sur ta feuille
Private Sub CommandButton1_Click()
Dim i As Integer: Dim Tvar
For i = 1 To 10
ListBox1.AddItem "liste :" & i
Next
MsgBox "la liste est chargée"
Tvar = ListBox1.List
MsgBox "le tableau est chargé"
[C1:C10] = Tvar
End Sub