Dim procs() As System.Diagnostics.Process
procs = Process.GetProcessesByName("Meine Anwendung")
 
For i as Integer = 0 to procs.Length -1
   ExterneAnwendung = procs(i)
   If ExterneAnwendung.HasExited = False Then
      If ExterneAnwendung.CloseMainWindow() = False Then
          ExterneAnwendung.Kill()
      End If
   End If
Next