ListBox avec CheckBox
Résolu
Bonjour,
Je travaille sur VB6. , et j'ai une ListBox avec CheckBox.
Je veux quand je coche une case ( valeur True) les autres case soient décochèes ( valeur False)
Merci pour votre aide
Je travaille sur VB6. , et j'ai une ListBox avec CheckBox.
Je veux quand je coche une case ( valeur True) les autres case soient décochèes ( valeur False)
Merci pour votre aide
1 réponse
-
Bonjour,
'Une seule selection, la derniere Private Sub List1_Click() For i = 0 To List1.ListCount - 1 If i <> List1.ListIndex Then 'compteur <> de la selection List1.Selected(i) = False 'decoche l'autre End If Next i End Sub-
-
Re bonjour
Autre chose, j'ai conçu une liste commandée par le bouton ( Ouvrir ).
Sur cette liste ( avec CheckBox ) apparait 3 années.
Comme au chargement de l'application apparait sur le ( MDIform.caption) la dernière année.
L'dée est lors de charger la form (ouvrir) la case de l'année parue au MDIForm.caption soit cochée.
J'ai conçu un code mais toujour la case de la première annèe qui soit cochèe.
Le code ecrit sur form_load
Sub Form_load
Dim varIndex as integer
If liste= VarDossier then
'l'annee parut sur MDIform.captiob
varIndex=liste.listindex
End if
Liste.selected(varIndex)=true
End sub -
-
Re bonjour
Je m'explique un peu mieux
Au moment de l'ouverture de l'application, les données du dernier dossier s'affiche en haut de la barre du menu.
Parfois, je seari appelé à ouvrir un autre dossier anterieur. A ce moment je vais ouvrir la liste des dossiers ( cette liste est avec case à cocher)
Ce que je cherche est lors de l'ouverture de cette liste, la case à cocher du dossier déjà ouvert ( avant de choisir l'anterieur ou autre) doit être cochée ( valeur true de liste.selected)
Merci -
-
