Formulaire Access

Fermé
Louise - 17 juin 2010 à 11:45
 Louise - 17 juin 2010 à 12:27
Bonjour,

Je débute en visual basic et j'ai un pb qui me bloque vraiment dans l'avncement de mon travail!
Mon pb est de rendre des données visibles ou invisibles dans mon formulaire Access !
Je tape dans le code évenement du champs question, dans le current formulaire:


Private Sub Form_Current()
If [Question] = "Qualité de notre accueil" Then
Me![Mauvais :Vrai/faux].Visible = True
Me![Médiocre : Vrai/Faux].Visible = True
Me![Satisfaisant : Vrai/Faux].Visible = True
Me![Bien : Vrai/faux].Visible = True
Me![Echelle de 0 à 10] = False
Me![Commentaires] = False
End If

If [Question] = "Traitement de votre demande" Then
Me![Mauvais :Vrai/faux].Visible = True
Me![Médiocre : Vrai/Faux].Visible = True
Me![Satisfaisant : Vrai/Faux].Visible = True
Me![Bien : Vrai/faux].Visible = True
Me![Echelle de 0 à 10] = False
Me![Commentaires] = False
End If
Etc...
End Sub

J'ai plusieurs pb,
1) Lorque les champs Echelle de 0 à 10 et Commentaire sont marqués comme invisibles, ils apparaissent mais avec la valeur 0 à l'intérieur !!

2) Lorsque je met dans ma 5eme boucle If, les champs [Mauvais :Vrai/faux], [Médiocre :Vrai/faux] etc. (qui sont des cases à cocher) comme étant invisible, elles s'effacent aussi dans les 4 lignes précedentes donc je n'ai plus mes données !!


Merci d'avance pour votre aide

1 réponse

Utilisateur anonyme
17 juin 2010 à 12:11
Bonjour,

1) C'est normal, tu as oublié de spécifier la propriété Visible !
Me![Echelle de 0 à 10] = False
Me![Commentaires] = False

doit être
Me![Echelle de 0 à 10].Visible = False
Me![Commentaires].Visible = False

2) C'est normal aussi : tu es sur un formulaire continu. Si tu rend un champs Visible ou Non, il l'est pour chaque ligne de ton formulaire...

Manu
0
oui j'avais vu que j'avais oublié le visible ! merci bcp
0