IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB 6 et antérieur Discussion :

Comment recupérer les cases selectionnés dans une liste à Checkbox


Sujet :

VB 6 et antérieur

  1. #1
    Membre à l'essai
    Inscrit en
    Février 2009
    Messages
    22
    Détails du profil
    Informations forums :
    Inscription : Février 2009
    Messages : 22
    Points : 22
    Points
    22
    Par défaut Comment recupérer les cases selectionnés dans une liste à Checkbox
    Bonjour tout le monde,
    En fait j'ai une liste avec des cases à cocher et je veux afficher dans une deuxième liste l'ensemble des élément selectionnés dans la première.
    Je me demande s'il ya une méthode ou une propriété qui me permet de faire ça...ah je vous informe que je travaille avec vb6 et non pas vb.Net.
    J'attends vos reponses et merci d'avance.

  2. #2
    Rédacteur
    Avatar de DarkVader
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2002
    Messages
    2 130
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Mai 2002
    Messages : 2 130
    Points : 3 118
    Points
    3 118
    Par défaut
    Bonjour,
    Pour un listBox ou listview il faut vérifier pour chaque item la propriété checked.

  3. #3
    Membre expert
    Avatar de Delbeke
    Profil pro
    Inscrit en
    Juillet 2006
    Messages
    2 675
    Détails du profil
    Informations personnelles :
    Âge : 70
    Localisation : France

    Informations forums :
    Inscription : Juillet 2006
    Messages : 2 675
    Points : 3 696
    Points
    3 696
    Par défaut
    Désolé Dark, c'est plutot la propriété selected, il me semble

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    Private Sub Command1_Click()
      Dim iPnt As Integer
      For iPnt = 0 To List1.ListCount - 1
        If List1.Selected(iPnt) Then
          Debug.Print List1.List(iPnt) & " coché"
        Else
          Debug.Print List1.List(iPnt) & " non coché"
        End If
      Next
    End Sub

  4. #4
    Rédacteur
    Avatar de DarkVader
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mai 2002
    Messages
    2 130
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Mai 2002
    Messages : 2 130
    Points : 3 118
    Points
    3 118
    Par défaut
    Désolé,
    Je n'utilise plus listbox depuis un certain temps (trop peu maléable)
    et effectivement, seul le listview peu dissocier les checked des selected.

  5. #5
    Membre à l'essai
    Inscrit en
    Février 2009
    Messages
    22
    Détails du profil
    Informations forums :
    Inscription : Février 2009
    Messages : 22
    Points : 22
    Points
    22
    Par défaut
    Citation Envoyé par Delbeke Voir le message
    Désolé Dark, c'est plutot la propriété selected, il me semble

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    Private Sub Command1_Click()
      Dim iPnt As Integer
      For iPnt = 0 To List1.ListCount - 1
        If List1.Selected(iPnt) Then
          Debug.Print List1.List(iPnt) & " coché"
        Else
          Debug.Print List1.List(iPnt) & " non coché"
        End If
      Next
    End Sub

    Merci beaucoup Delbeke, c vraiment ce que j'en avais besoin
    merci encore une fois.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 7
    Dernier message: 07/01/2008, 17h50
  2. Réponses: 9
    Dernier message: 04/04/2007, 12h01
  3. Réponses: 4
    Dernier message: 01/10/2006, 15h37
  4. Réponses: 3
    Dernier message: 26/09/2006, 11h06
  5. Réponses: 4
    Dernier message: 07/08/2006, 17h01

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo