Probleme mit FileSystemWatcher (Thread - Übergabe )

imports system.io

Public Class Watcher
    Private Path2Watch As String
    Private fsw As FileSystemWatcher
    Private mEvt As WaitForChangedResult

Private Sub cmd_startwatch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmd_startwatch.Click

        fsw = New FileSystemWatcher
        Path2Watch = Directory.GetCurrentDirectory()
        fsw.Path = Path2Watch
        fsw.IncludeSubdirectories = True

        AddHandler fsw.Created, _
          New FileSystemEventHandler(AddressOf IsCreated)

        AddHandler fsw.Changed, _
          New FileSystemEventHandler(AddressOf IsChanged)

        AddHandler fsw.Deleted, _
          New FileSystemEventHandler(AddressOf IsDeleted)

        AddHandler fsw.Renamed, _
          New RenamedEventHandler(AddressOf IsRenamed)

        While True
            mEvt = fsw.WaitForChanged(WatcherChangeTypes.All)
        End While
    End Sub
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''  
Private Sub IsCreated(ByVal source As Object, _
    ByVal evt As FileSystemEventArgs)
        If fsw.IncludeSubdirectories = True Then
        lbl_Watcher.Text = (evt.FullPath + " wurde erstellt")  
        Else
        lbl_Watcher.Text = (evt.Name + " wurde erstellt")  
        End If
    End Sub
....