Bonjour à tous

voilà j'essaie de masquer et / ou d'afficher certains contrôles dans un formulaire,
Mais j'ai un souci (le contrôle masqué ne s'affiche plus même la condition est vraie).
Dans le code, si la case est cochée "ChkVivant"

- La zone de texte "TxtVivant" et L'étiquette "LblVivant" sont visibles,
et les contrôles "TxtDeces", "LblDeces" sons masqués dans le formulaire

Par contre si la case "ChkVivant" n'est pas cochée,
le contrôle "LblVivant" reste toujours masqué, mais le "TxtVivant" est bien affiché.

Je ne comprends pas pourquoi...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Private sub form_current ()
 
  If (ChkVivant = 0 ) Then
      Me.TxtVivant.Visible = False
      Me.LblVivant.Visible = False
      Me.TxtDeces.Visible = True
      Me.LblDeces.Visible = True
  End If
 
End sub
J'ai même modifié le code en insérant les deux conditions
Cela ne change rien.
Merci d'avance pour votre aide