Dim xml = <?xml version="1.0"?>
          <prozesse>
              <%= From p In Process.GetProcesses() _
                  Select <process name=<%= p.ProcessName %>>
                             <threads><%= p.Threads.Count %></threads>
                         </process> %>
          </prozesse>
 
Console.WriteLine(xml)

Ralf