EXEMPLE DE MANIPULATION DE DONNÉES ENTRE DEUX LISTBOX : AJOUT, DÉPLACEMENT (VERS
cs_Darkukai
Messages postés
38
Date d'inscription
vendredi 27 septembre 2002
Statut
Membre
Dernière intervention
29 mai 2006
-
18 juin 2003 à 08:52
cs_Darkukai Messages postés 38 Date d'inscription vendredi 27 septembre 2002 Statut Membre Dernière intervention 29 mai 2006 - 29 mai 2006 à 09:06
cs_Darkukai Messages postés 38 Date d'inscription vendredi 27 septembre 2002 Statut Membre Dernière intervention 29 mai 2006 - 29 mai 2006 à 09:06
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/7519-exemple-de-manipulation-de-donnees-entre-deux-listbox-ajout-deplacement-version-beta
https://codes-sources.commentcamarche.net/source/7519-exemple-de-manipulation-de-donnees-entre-deux-listbox-ajout-deplacement-version-beta
29 mai 2006 à 09:06
27 mai 2006 à 10:44
14 avril 2004 à 11:02
18 juin 2003 à 08:52
pour monter un item
If List2.ListIndex <> 0 Then
list2text = List2.List(List2.ListIndex)
list2textindex = List2.ListIndex
List2.List(list2textindex) = List6.List(list2textindex - 1)
List2.List(list2textindex - 1) = list2text
List2.Selected(list2textindex - 1) = True
End If
pour le descendre le test est
If List2.List(list2textindex + 1) <> "" Then
List2.List(list2textindex) = List2.List(list2textindex + 1)
List2.List(list2textindex + 1) = list2text
List2.Selected(list2textindex + 1) = True
End If
voila