Comment rendre visible ou invisible une image ?

Bonjour,

Dans un champ de mon formulaire j'ai soit la valeur 1 soit la valeur 2 soit rien "".

Lorsque 1 ou 2 s'affiche je voudrais que mon image apparaisse, au contraire si le champ "valeur" est vide la masquer.
Mon événement est sur après mise à jour d'une liste déroulante, c'est lorsque j'active cette dernière que la valeur passe à 1 ou 2 ou "".
ça fonctionne que dans un sens pas dans l'autre.
Par défaut mon image est sur visible = non.
parfois ma liste est vide.

Merci d'avance.
Philippe

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub maliste_AfterUpdate() If Me.Valeur = 1 Or 2 Then Me.Image1.Visible = True Else If Me.Valeur = Null Then Me.Image1.Visible = False End If Me.maliste.Requery End If End Sub

---

Bonjour,
Avec l'indentation de ton code c'est plus simple à lire. Merci de penser au lecteur !

Donc,
D'une part ceci n'est pas correct :

Code:

---

If Me.Valeur = 1 Or 2 Then

---

On écrit cela :

Code:

---

If Me.Valeur = 1 Or Me.Valeur = 2 Then

---

Ensuite

Code:

---

If Me.Valeur = Null Then

---

Il faut vérifier la valeur que "Valeur" renvoie. Généralement on trouve Null dans un champ qui n'a pas été rempli, par contre si tu veux tester "" ce n'est pas pareil que Null.
Pour tester un champ vide (qui est différent de Null) on utilisera :

Code:

---

if len(me.Valeur)=0 then

---

Je pense qu'entre ces 2 ajustements tu résoudras ton problème.

Cordialement,

Merci pour la réponse.
J'ai bien modifié mais ça ne fonctionne pas, l'image n'est pas invisible si je change la sélection de ma liste, le champ qui affiche 1 ou 2 ou qui reste vide se met à jour automatiquement en activant la liste, il n'est jamais "utilisé" .

Merci,

Bon dimanche.
Philippe

Que représente Valeur ?
Est-il valorisé ?

Le champ "valeur" extrait le chiffre 1 ou 2 de la liste qui se trouve côté plusieurs.

Code:

---

=[lstprobleme].[column](3)

---

le chiffre 1 et 2 sont utilisés seuls.

ils servent à afficher l'image ou non, dans ma liste sur 50 enregistrements seulement 10 ont la valeur 1 ou 2.
1 pour boisson
2 pour viande par exemple.
pour les autres pas de valeur "légume" etc..

mais il y a sans doute une autre solution pour faire disparaitre cette image !

Merci.

Et si on utilise

Code:

---

=[lstprobleme].[column](3)

---

dans le code plutôt que de passer par un champ supplémentaire qui extrait la valeur ?

Je ne sais pas si c'est possible.

Merci.

Passer par Valeur est-il obligatoire ?

Pourquoi ne pas aller droit au but en écrivant :

Code:

---

1 2 3 4 5

if me.lstProbleme.column(3) = 1 Or me.lstProbleme.column(3) = 2 then me.image.visible = true else me.image.visible = false endif

---

Ou encore plus direct comme :

Code:

---

me.image.visible = (me.lstProbleme.column(3) = 1 Or me.lstProbleme.column(3) = 2)

---

qui remplace les 5 lignes précédentes.

Mais peut-être que Valeur a une autre utilité ?

Bonjour et merci,

ça fonctionne sur réception focus du champ qui contient la valeur après avoir quitté la liste, ça devrait aller comme ça.

Bonne journée,

@+
Philippe