ex(myProcesses(zj).Modules(n).EntryPointAddress.ToInt32)
  .Add(m)
  .Add(myProcesses(zj).Modules(n).FileVersionInfo)
  .Add(myProcesses(zj).Modules(n).ModuleMemorySize)
  .Add(myProcesses(zj).Modules(n).ModuleName)
  End With
  End Sub
  
  　　End Class 这下就大工告成了，最后对程做一点补充说明，各位读者，当你知道了如何编写这个程序时，你可能会想如果只是写一个单纯的这个程序你可能会觉得没什么意义，那如何才可以将这段程序发挥他更大的意义？就让我来告诉你。其实这段代码并不是我刻意编写的，而是一个局域网中的远程控制的一部分。扫描客户机上运行的进程，查看客户机的资源，将获得的信息发个服务器，并可以通过Processes类来关闭客户机上的进程，以便管理者对客户机进行管理。此外写这篇文章的另一个目的是希望读者更快的掌握.net中System.Diagnostics.Process，System.Diagnostics.processThread，System.Diagnostics. ProcessModule类。在vb.net和win2000通过 。