OVH Cloud OVH Cloud

Listbox checkbox comment ça marche ?

1 réponse
Avatar
Joseph PUSZTAY
Listbox checkbox comment ça marche ?

Bonjour,

Je voudrais me servir d'une case checkbox d'une listbox pour pointer ou
non une ligne (pointage d'opérations sur un compte bancaire par exemple),
seulement je ne sais comment faire, voire si c'est possible ?

Ainsi j'ai besoin de 2 infos :

-1- Lors du chargement de la liste, comment tester la variable est si un
valeur X est présente, afficher le checkbox correspondant ?

-2- Lors de l'enregistrement des datas de la liste, comment faire pour que
si, un chexkbox est coché, je puisse ajouter cette info à la variable
correspondante de la liste avant de la passer dans le fichier?

Nota bene, j'ai prévu à cet effet un octet de la variable pour chaque ligne
de la liste, qui a l'état 0 sir le checkbox est vide, et 1 pour le
contraire...

Merci, au revoir et à bientôt.

Joe.

1 réponse

Avatar
François Picalausa
Bonjour/soir,

Essaye ceci::

'1 feuille, form1
'contenant
' 1 Listbox, List1, Style = 1 - Checkbox
' 1 Listbox, List2
' 1 CommandButton, Command1

Option Explicit

Private Sub Form_Load()
Dim i As Long

For i = 1 To 20
List1.AddItem "Item" & i
List1.Selected(List1.NewIndex) = ((i Mod 2) = 0)
Next i
End Sub

Private Sub Command1_Click()
Dim i As Long

List2.Clear
'En fonction des cas, on pourrait optimiser par un arrêt
'de la boucle si le nombre d'items récupérées = List1.SelCount

For i = 0 To List1.ListCount - 1
If List1.Selected(i) Then List2.AddItem List1.List(i)
Next i
End Sub


--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"Joseph PUSZTAY" a écrit dans le message de
news:ukdHK$
Listbox checkbox comment ça marche ?

Bonjour,

Je voudrais me servir d'une case checkbox d'une listbox pour
pointer ou non une ligne (pointage d'opérations sur un compte
bancaire par exemple), seulement je ne sais comment faire, voire si
c'est possible ?

Ainsi j'ai besoin de 2 infos :

-1- Lors du chargement de la liste, comment tester la variable est si
un valeur X est présente, afficher le checkbox correspondant ?

-2- Lors de l'enregistrement des datas de la liste, comment faire
pour que si, un chexkbox est coché, je puisse ajouter cette info à la
variable correspondante de la liste avant de la passer dans le
fichier?

Nota bene, j'ai prévu à cet effet un octet de la variable pour chaque
ligne de la liste, qui a l'état 0 sir le checkbox est vide, et 1 pour
le contraire...

Merci, au revoir et à bientôt.

Joe.