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. Diese Seite wurde bereits 23.229 mal aufgerufen. |
sevWizard für VB5/6 Professionelle Assistenten im Handumdrehen Erstellen Sie eigene Assistenten (Wizards) im Look & Feel von Windows 2000/XP - mit allem Komfort und zwar in Windeseile :-) Buchempfehlung Tipp des Monats Mai 2024 Hermann Röttger Wochentage eines Datumsbereichs ermitteln Wochentage eines Datumsbereichs ermitteln, optional mit Feiertagsberechnung Access-Tools Vol.1 Über 400 MByte Inhalt Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB |
||||||||||
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein. |