URGENT-ListBox

Question

Bonjour...
J'ai 2 listbox...un avec ma liste d'objet non trié (List1) et une autre qui ne contient qu'un seul objet (List2) (évidemment ce sont des chaines de caracteres). Je désire insérer dans List1 l'objet se trouvant dans List2, mais à un endroit déterminé par l'usager avec l'aide d'un inoutbox. 
Ma question est de savoir COMMENT faire cela, comment faire descendre les objets de ma List1 d'un espace afin de pouvoir insérer l'objet de List2 à l'endroit voulu.

Si vous avez une idée, SVP ne vous gênez pas

Désespéremment

Luke

renaud · Answer

C'est pas trop compliqué si tu maîtrises les collections en VB (modules de classes). soit StrChaine_a_Ajouter, la chaîne provenant de List2 à insérer dans List1.

1 - Tu charges List1 dans la collection, Key = la chaîne venant de List1.
2 - Tu vides List1 (Clear)
3 - Tu fais une boucle de lecture sur ta collection, et pour chaque item lu :
  S'il est inférieur à StrChaine_a_Ajouter
    Tu l'ajoutes (.add) dans List1
  Sinon
     Tu ajoutes StrChaine_a_Ajouter
     Tu ajoutes l'élément lu
     Tu charges StrChaine_a_Ajouter avec "ZZZZZZ" (ou chr(255)) pour sauter le test prédédent
fin de boucle.

Me suis-je fait bien comprendre ?

Amitiés - Renaud - (Tu peux étudier Treeview Suite, il marche avec des collections, ou m'écrire en direct pour plus d'info...)

URGENT-ListBox

1 réponse

Discussions similaires