faire clignoter un labelRésolu

Question

Bonjour,
svp comment faire clignoter un label.

merci

mdevaux62 · Accepted Answer

Tu ajoutes un contrôle Timer (Timer1) et y=un Lable (Label1) à ta Form.
Tu ajoutes le code suivant :

    Private Sub FaireClignoter()
        Timer1.Interval = 200
        Timer1.Tag = 0
        Timer1.Start()
    End Sub

    Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Label1.Visible (Label1.Visible False)
        Timer1.Tag += 1
        If Timer1.Tag = 20 Then
            Timer1.Stop()
            Label1.Visible = True
        End If
    End Sub
Pour lancer le clignotement du Label, tu appelles la procédure FaireClignoter. 
Ici, le Label clignote 20 fois puis reste ensuite visible. 
On peut le faire clignoter plus ou moins vite on jouant sur la propriété Interval du Timer.

cs_Jack · Answer

Salut

En le rendant invisible cycliquement.
Voir .Visible + objet Timer

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

elwadeh · Answer

Bonjour,
comment je peux faire ce que vous me dite.
merci encore

cs_Jack · Answer

Je vois que tu ne fais toujours aucun effort pour lire les doc ni faire de petits tests persos ...

elwadeh · Answer

Bonjour,
j'ai réussi bcp de chose tout seul mais quuand je me bloque je fais appel aux expert c'est pas méchant je crois.

elwadeh · Answer

Bonjour,
ça marche impec merci encore une fois

cs_cheyenne · Answer

Bonjour,

Pour attirer l'attention tu peux également faire une inversion de couleurs de ton label.
Si ton label à un fond blanc et le texte en noir tu passes le fond en noir et le texte en blanc et vice-versa à chaque intervalle du Timer.

Cheyenne

stevejob · Answer

bonsoir si quelqu'un peux m'expliquer pourquoi pour moi le bout de code ne marche pas merçi

ucfoutu · Answer

Bonjour, stevejob,
 Va donc savoir pourquoi ... !
Trois explications possibles :
1) tu ne développes pas sous VB.Net ( et alors, bien évidemment ...)
2) tu as fait autre chose (et on ne peut deviner quoi, sans voir ce que TU as écrit)
Au passage, tout-de-même : la propriété tag est de type string (il vaudrait mieux en utiliser la conversion en numérique pour incrémenter le compteur).
3) tu as bien observé les instructions, mais n'a pas lancé la procédure

Faire clignoter un label

9 réponses

Votre réponse

Discussions similaires