Discussion :

[cuicui08]

Bonjour,

je réalise actuellement des formulaires sous Access et je souhaiterais qu'une listbox de ce formulaire n'apparraisse que si une case à cocher est coché, et devienne gris si cette derniere est decoché. Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Private Sub cochPre_Click()
    Dim boolCoch As Boolean
    If boolCoch = False Then
        Form_FICHE.lstTest.Locked = False
        boolCoch = True
    Else
        Form_FICHE.lstTest.Locked = True
        boolCoch = False
    End If
End Sub

Cependant, je crois que mon booleen s'initialise toujours à False au moment du clic. Comment puis je faire pour contourner cela??

Merci

[ouskel'n'or]

Ton boolean doit être déclaré en public, dans les déclarations ("Général")

A+

[cuicui08]

C'est a dire ? Je dois faire comment ?

[SfJ5Rpw8]

sinon utilise une variable "static" qui conserve sa valeur entre 2 appels de fonction pour cela remplace ta ligne Dim...

par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

static boolCoch As Boolean

[cuicui08]

Nikel ca marche ;-) Merci beaucoup :-D

Bonne prog à tous