Process.GetCurrentProcess 方法的VB.NET例子

来源:互联网 发布:python如何安装pip教程 编辑:程序博客网 时间:2024/06/05 17:07

下面的示例检索的信息涉及当前进程、本地计算机上运行的“记事本”的所有实例、在使用计算机别名和 IP 地址的特定计算机上运行的“记事本”的所有实例、本地计算机和远程计算机上运行的所有进程,以及本地计算机或远程计算机上使用进程 ID 的特定进程。

Imports SystemImports System.DiagnosticsImports System.ComponentModelNamespace MyProcessSample    _   '/    '/ Shell for the sample.   '/    Class MyProcess                              Sub BindToRunningProcesses()         ' Get the current process.         Dim currentProcess As Process = Process.GetCurrentProcess()                           ' Get all instances of Notepad running on the local         ' computer.         Dim localByName As Process() = Process.GetProcessesByName("notepad")                           ' Get all instances of Notepad running on the specifiec         ' computer.         ' 1. Using the computer alias (do not precede with "//").         Dim remoteByName As Process() = Process.GetProcessesByName("notepad", "myComputer")                  ' 2. Using an IP address to specify the machineName parameter.          Dim ipByName As Process() = Process.GetProcessesByName("notepad", "169.0.0.0")                           ' Get all processes running on the local computer.         Dim localAll As Process() = Process.GetProcesses()                           ' Get all processes running on the remote computer.         Dim remoteAll As Process() = Process.GetProcesses("myComputer")                           ' Get a process on the local computer, using the process id.         Dim localById As Process = Process.GetProcessById(1234)                           ' Get a process on a remote computer, using the process id.         Dim remoteById As Process = Process.GetProcessById(2345, "myComputer")      End Sub 'BindToRunningProcesses                               Shared Sub Main()                  Dim myProcess As New MyProcess()                           myProcess.BindToRunningProcesses()      End Sub 'Main    End Class 'MyProcessEnd Namespace 'MyProcessSample
原创粉丝点击