Bonjour à tous, voila j'ai ce code dans mon formulaire:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub Form_Timer()
 
 If Texte217 <> "" Then
 
        With Texte217
            If .ForeColor = 0 Then
                .BackColor = 16777215
                .ForeColor = 255
            Else
                .BackColor = 255
                .ForeColor = 0
 
            End If
            End With
            End If
End Sub
Il me permet de faire clignoter la zone de texte217 quand j'ai un texte dedant.
Mais je voudrais y rajouter une condition.
Je voudrais que quand la zone de texte217 est vide, le message "pas d'info aujourd'hui" apparaisse et que la zone de texte ne clignotte plus .
Merci d'avance pour votre participation