Public Sub New()
  MyBase.New()
 
       Application.EnableVisualStyles() ' Visuelle Stile aktivieren
       Application.DoEvents() ' Behebt ein Problem mit ImageList-Steuerelementen
 
   ' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
       InitializeComponent()
 
      ' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
 
End Sub

Shared Sub Main()
    Application.EnableVisualStyles() ' Visuelle Stile aktivieren
    Application.DoEvents() ' Behebt ein Problem mit ImageList-Steuerelementen
    Application.Run(New Form1) ' Beispiel für ein bisheriges Startobjekt
End Sub