Public Sub New()
 
        ' Dieser Aufruf ist für den Designer erforderlich.
        InitializeComponent()
 
        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf 
        ' hinzu.
'hier kann mein Code starten
 
    End Sub

 
Private Sub MainWindow_Loaded(sender As Object, e As RoutedEventArgs) Handles _
  Me.Loaded
        'hier kann mein Code starten
    End Sub

Dim frame As Dispatcher = System.Windows.Application.Current.Dispatcher
frame.BeginInvoke(Sub() machEtwasInDerGUI())

Gewu?t wie spart Energie!