Faire briller un texte dans un label ou textbox
Soyez le premier à donner votre avis sur cette source.
Snippet vu 12 801 fois - Téléchargée 79 fois
Contenu du snippet
Je vous conseille de prendre le zip ou alors:
Timer2
Inserez le code suivant dans le formulaire :
Pour les autres couleurs, reflechissez un peu !
- Créer un label : Label1
- Créer 2 Timer : Timer1
Timer2
Inserez le code suivant dans le formulaire :
Source / Exemple :
Private Sub Form_Load() End Sub Private Sub Timer1_Timer() Label1.Tag = Label1.Tag + 10 If Label1.Tag > 255 Then Timer1.Enabled = False: Timer2.Enabled = True Label1.ForeColor = RGB(0, 0, Label1.Tag) End Sub Private Sub Timer2_Timer() Label1.Tag = Label1.Tag - 10 If Label1.Tag < 1 Then Timer2.Enabled = False: Timer1.Enabled = True Label1.ForeColor = RGB(0, 0, Label1.Tag) End Sub
Conclusion :
Pour les autres couleurs, reflechissez un peu !
A voir également
- Faire briller un texte dans un label ou textbox
- Faire flasher un texte dans un label - Codes sources - Visual Basic / VB.NET (Formulaire)
- Visual Basic / VB.NET : Faire defiler un texte dans un label - CodeS SourceS - Guide
- Changer texte sur un label en appuyant sur un bouton ✓ - Forum - VB.NET
- Rendre selectionnable le texte d'un label ✓ - Forum - VB.NET
- Longueur du texte d'un label ✓ - Forum - VB.NET
Commentaires
bon prog...
En fait il faut mettre la propriete "tag" du label (label1) a 0 et regler les proprietes "interval" des 2 timer a 10 par exemple...
Popok
ET y a pas de zip !!!
objet.tag est du type string
Alors label1.tag+10 !!!!
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.