Получить путь к .exe файлу из запущенного процесса

Private Sub ComboBox1_Click(sender As Object, e As EventArgs) Handles ComboBox1.Click
        Dim processes() = Process.GetProcesses
        Dim windows As New List(Of WindowInfo)
        Dim s As String = Strings.Space(200)
 
        For Each pr In processes
            If pr.MainWindowHandle <> 0 Then
                hndl = pr.MainWindowHandle
                SendMessage(hndl, WM_GETTEXT, 200, s)
                GetWindowRect(hndl, rect)
                windows.Add(New WindowInfo With {.WindowCaption = s, .WindowRect = rect})
' здесь пытаюсь получить пути к ехе файлу               
 ListBox1.Items.Add(pr.Modules(0).FileName)
            End If
        Next
 
        ComboBox1.DataSource = windows
        ComboBox1.DisplayMember = "WindowCaption"
    End Sub