FileSystemWatcher funktioniert nicht

Ich fügte hinzuFileSystemWatcher in Form1_Laden wie folgt:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ....................
        Dim watcher As New FileSystemWatcher()
        'For watching current directory
        watcher.Path = "/"
        'For watching status.txt for any changes
        watcher.Filter = "status.txt"
        watcher.NotifyFilter = NotifyFilters.LastWrite
        watcher.EnableRaisingEvents = True
        AddHandler watcher.Changed, AddressOf OnChanged
End Sub

Ich habe eine OnChanged-Funktion, die eine einfache MessageBox ist. Trotzdem, wenn ich das @ ändestatus.txt Datei, es wird kein Meldungsfeld angezeigt.

Antworten auf die Frage(4)

Ihre Antwort auf die Frage