OVH Cloud OVH Cloud

Comment faire clignoter la légende dans un formulaire en VBA

2 réponses
Avatar
PICCOLI Isaia
Bonjour,
J'ai un formulaire.Je mets une légende à ce formulaire
ex : Me.Caption = "Pas d'enregistrements pour " & Signal.nom & " " &
Signal.prenom
J'aimerais faire clignoter ou changer la couleur du texte de cette propriété
"Caption".
Quelqu'un peut-il m'aider ?
Merci.
Isaia

2 réponses

Avatar
Raymond [mvp]
Bonsoir.

tu peux utiliser le timer et une fois sur deux tu places ton message dans
la légende et une fois sur deux tu la vides. un timerinterval à 250 environ
doit aller.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour une meilleure
efficacité de tes interventions sur MPFA


"PICCOLI Isaia" a écrit dans le message de
news:3fb293f6$0$11539$
Bonjour,
J'ai un formulaire.Je mets une légende à ce formulaire
ex : Me.Caption = "Pas d'enregistrements pour " & Signal.nom & " " &
Signal.prenom
J'aimerais faire clignoter ou changer la couleur du texte de cette
propriété

"Caption".
Quelqu'un peut-il m'aider ?
Merci.
Isaia




Avatar
Raymond [mvp]
Bonjour.

Tu es sûr qu'avec ça tu fais clignoter la barre de titre du formulaire ?

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour une meilleure
efficacité de tes interventions sur MPFA


"Manova" a écrit dans le message de
news:wgBsb.7940$
En effet, tu peux utiliser le code suivant en l'aménagent un peu :


Dans l'événement "Sur minuterie", tapez le code suivant :
If Me![lblTitre].Visible = true then
Me![lblTitre].Visible = false
Else
Me![lblTitre].Visible = true
End IfCode qu'on peut d'ailleurs abréger en :

Me![lblTitre].Visible = Not Me![lblTitre].Visible
Il ne reste plus qu'à enregistrer votre formulaire et à le réouvrir en
mode

normal.

Variante :

Au lieu de rendre l'intitulé Visible/Invisible, on peut aussi lui changer
de

couleur.
Par exemple, pour alterner le blanc et le bleu :

If Me![lblTitre].ForeColor = 16777215 Then
Me![lblTitre].ForeColor = 8388608
Else
Me![lblTitre].ForeColor = 16777215
End IfIci tu utilise la couleur de ta barre qui aura pour effet de rendre
ton caption invisible.Bye ! Manova.


"Raymond [mvp]" a écrit dans le message de
news:
Bonsoir.

tu peux utiliser le timer et une fois sur deux tu places ton message
dans


la légende et une fois sur deux tu la vides. un timerinterval à 250
environ

doit aller.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour une meilleure
efficacité de tes interventions sur MPFA


"PICCOLI Isaia" a écrit dans le message de
news:3fb293f6$0$11539$
Bonjour,
J'ai un formulaire.Je mets une légende à ce formulaire
ex : Me.Caption = "Pas d'enregistrements pour " & Signal.nom & " " &
Signal.prenom
J'aimerais faire clignoter ou changer la couleur du texte de cette
propriété

"Caption".
Quelqu'un peut-il m'aider ?
Merci.
Isaia