Con la Class WindowsIdentity no vas a conseguir nada, el método GetCurrent devuelve el usuario local, y debes conocer el nombre del usuario (o el UPN si no formas parte de un dominio) para identificar un usuario usando el Constructor de dicha Class.

Aparte de eso, un FilesystemWatcher no recibe ni devuelve ningún tipo de información sobre el usuario en cuestión, según parece es una tarea bastante compleja de llevar a cabo, tienes mucha información sobre esto en los resultados de Google:

---

La información de la función NetFileGetInfo es muy escasa así que no puedo mostrarte un ejemplo funcional (tampoco se si funcionaría, solo especulan por internet).
( http://msdn.microsoft.com/en-us/library/windows/desktop/bb525379%28v=vs.85%29.aspx )

Puedes probar la siguiente solución (ya no recuerdo de donde obtuve el código) sacada de: http://stackoverflow.com/questions/11660235/find-out-usernamewho-modified-file-in-c-sharp, pero personalmente y al menos en Windows 8.1 a mi me devuelve el grupo de usuarios (Administradores), no el usuario (Administrador).

La versión en VB.NET

Imports System.Text
Imports System.IO
 
Public Class Form1
 
    Private Function GetSpecificFileProperties(file As String, ParamArray indexes As Integer()) As String
 
        Dim fileName As String = Path.GetFileName(file)
        Dim folderName As String = Path.GetDirectoryName(file)
        Dim shell As New Shell32.Shell()
        Dim objFolder As Shell32.Folder
        objFolder = shell.[NameSpace](folderName)
        Dim sb As New StringBuilder()
        For Each item As Shell32.FolderItem2 In objFolder.Items()
            If fileName = item.Name Then
                For i As Integer = 0 To indexes.Length - 1
                    sb.Append(objFolder.GetDetailsOf(item, indexes(i)) + ",")
                Next
                Exit For
            End If
        Next
        Dim result As String = sb.ToString().Trim()
        If result.Length = 0 Then
            Return String.Empty
        End If
        Return result.Substring(0, result.Length - 1)
 
    End Function
 
    Private Sub FileSystemWatcher1_Changed(sender As Object, e As FileSystemEventArgs) _
    Handles FileSystemWatcher1.Changed, FileSystemWatcher1.Created
 
        Dim filepath As String = e.FullPath
 
        Dim Type As String = GetSpecificFileProperties(filepath, 2)
        Dim ObjectKind As String = GetSpecificFileProperties(filepath, 11)
        Dim CreatedDate As DateTime = Convert.ToDateTime(GetSpecificFileProperties(filepath, 4))
        Dim LastModifiedDate As DateTime = Convert.ToDateTime(GetSpecificFileProperties(filepath, 3))
        Dim LastAccessDate As DateTime = Convert.ToDateTime(GetSpecificFileProperties(filepath, 5))
        Dim LastUser As String = GetSpecificFileProperties(filepath, 10)
        Dim ComputerName As String = GetSpecificFileProperties(filepath, 53)
        Dim FileSize As String = GetSpecificFileProperties(filepath, 1)
 
        Debug.WriteLine(LastUser)
        Debug.WriteLine(ComputerName)
 
    End Sub
 
End Class

---

Esta parece ser una solución, aunque personalmente no la he consguido hacer funcionar:
http://vbcity.com/forums/p/133307/698930.aspx#698930
+

Saludos.