CLIGNOTEMENT D'UN LABEL
Almandric
Messages postés
31
Date d'inscription
vendredi 21 décembre 2001
Statut
Membre
Dernière intervention
12 août 2003
-
7 janv. 2002 à 00:15
yoman64 Messages postés 962 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 2 août 2010 - 8 juin 2002 à 09:47
yoman64 Messages postés 962 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 2 août 2010 - 8 juin 2002 à 09:47
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/2346-clignotement-d-un-label
https://codes-sources.commentcamarche.net/source/2346-clignotement-d-un-label
8 juin 2002 à 09:47
26 janv. 2002 à 12:10
7 janv. 2002 à 12:47
Private Sub Timer1_Timer()
Label1.Visible = Not Label1.Visible
End Sub
7 janv. 2002 à 12:40
bigbang
bigbang00@caramail.com
7 janv. 2002 à 00:15
Un timer est déjà assez lourd à gérer comme ca pour éviter d'en mettre 2.
Dim contenu As String
Private Sub Form_Load()
contenu = "Toto"
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
If Label1.Caption = "" Then
Label1.Caption = contenu
Else
Label1.Caption = ""
End If
End Sub