Visual basic 6

Résolu
Bonjour,
Je travaille avec vb6 et mon "Form" contient:
- 2 objets ListBox:list1 et list2
- 1 objet commandButton
Mon question est le suivant:
comment procéder pour que,après un clic sur le boutton de commande, list2 reçoive une copie d'un élément sélectionné ds la liste1.
voilà le programme à compléter:

****
Private Sub Command 1 Click ()
list2.AddItem ...
And Sub
****

Merci bien d'avance et que dieu vous guide sur le bon chemin..
Configuration: Windows XP
Internet Explorer 6.0

3 réponses

  1. bonjour,

    tu vas simplement utiliser la propriété .text de ta list box 1. Ce qui te permet de choisir le text sélectionné^^

    Private Sub Command 1 Click ()
    list2.AddItem list1.text
    end Sub

    C'était tout simple ^^

    A+
    1. Bonjour,
      J'ai testé votre réponse mais elle n'a pas marché et un message d'erreur est apparu..SVP vérifier le..
      En tout cas merci bien..
      Bye.
  2. J'ai fait un copier coller du code que j'ai testé sous VB6 et ça marche ^^

    Si les noms des composants sont bien ceux énoncés il n'y a aucun problème.
    1. Bonsoir,
      J'ai refait le test..ça marche bien..
      Merci beaucoup..Que dieu vous protège ..
      cordialement.
  3. Bonjour,

    Teste ça :
    For i = 0 to List1.ListCount - 1
        If List1.Selected(i) Then
            List2.Additem List1.List(i)
        End If
    Next i


    Bon courage

    ;o)

    Polux
    1. Bonsoir,
      Merci beaucoup Polux31 pour votre aide.. c'est gentil..j'ai refait le test avec l'essai de "Le D" et ça marche bien..
      Amicalement.