Fenster blinken lassen Eine kleine Funktion, mit der sich ein Blink-Effekt für ein Fenster / Formular realisieren lässt.
Autor:   Dieter Otter	Bewertung:	Views:  11.418
www.tools4vb.de	System:  Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Vor kurzem wurde im Forum gefragt, wie man ein Formular blinken lassen kann.

Nachfolgend eine kleine Prozedur, die dies mittels der Opacity-Eigenschaft der Form erledigt. Hierzu wird die Transparenz des Fenster kurzfristig auf 100% gesetzt, so dass das Fenster quasi ganz kurz unsichtbar wird. Danach wird die Transparenz wieder auf 0% zurückgesetzt. Das Ganze erfolgt innerhalb einer Schleife, in der die Zeit zwischen ein- und ausblenden des Fensters über die Sleep-Methode auch individuell angepasst werden kann.

''' <summary>
''' Lässt die übergebene Form x mal blinken
''' </summary>
''' <param name="oForm">Form-Objekt</param>
''' <param name="Count">Anzahl der Blink-Aktionen</param>
Public Sub FormBlink(ByVal oForm As Windows.Forms.Form, ByVal Count As Integer)
  For i As Integer = 1 To Count
    oForm.Opacity = 0.1
    System.Threading.Thread.Sleep(150)
 
    oForm.Opacity = 100
    System.Threading.Thread.Sleep(150)
  Next i
End Sub

Aufrufbeispiel:

' Form 3 mal blinken lassen
FormBlink(Me, 3)

Copyright ©2000-2024 vb@rchiv Dieter OtterAlle Rechte vorbehalten.

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.