Rubrik: Fenster & Forms | 15.05.02 |
Blinkende Label VB-Version: VB5, VB6 | ||
Views: 23.216 |
Sie möchten, dass ein Label ständig blinkt? Dann setzen Sie einen Timer auf Ihre Form und ein Label und los geht's:
Private Sub Form_Load() Timer1.Interval = 500 ' Intervall 0,5 Sekunden End Sub Private Sub Timer1_Timer() Label1.Visible = Not Label1.Visible End Sub
Je nach vorgegebenem Intervall blinkt Ihr Label schneller oder langsamer. Sie können natürlich auch mehrere Timer und Label verwendenund diese dann unterschiedlich blinken lassen:
Private Sub Form_Load() Timer1.Interval = 500 ' Intervall 0,5 Sekunden Timer2.Interval = 1000 ' Intervall 1 Sekunde End Sub Private Sub Timer1_Timer() Label1.Visible = Not Label1.Visible End Sub Private Sub Timer2_Timer() Label2.Visible = Not Label2.Visible End Sub
Und wenn man dann noch die Labels mit verschiedenen Hintergrundfarben ausstattet - dann wird's schön bunt.