Imports System.Diagnostics Public Class Tester Public Shared Sub Main Dim pid As Integer = 12345
Dim p As Process = Process.GetProcessById(pid) If p Is Nothing Then Return Try
Console.WriteLine(p.Id.ToString())
Console.WriteLine(p.ProcessName)
Console.WriteLine(p.StartTime.ToLongTimeString())
Console.WriteLine(p.PriorityClass.ToString())
Console.WriteLine(p.VirtualMemorySize64.ToString())
Console.WriteLine(p.WorkingSet64.ToString()) If p.MainModule IsNot Nothing Then
Console.WriteLine(p.MainModule.FileName)
Console.WriteLine(p.MainModule.FileVersionInfo.FileDescription)
Console.WriteLine(p.MainModule.FileVersionInfo.FileVersion) End If Catch ex As Exception
Console.WriteLine(ex.Message) Finally
p.Close() End Try End Sub
End Class
Unhandled Exception: System.ArgumentException: Process with an Id of 12345 is not running.
at System.Diagnostics.Process.GetProcessById(Int32 processId, String machineName)
at System.Diagnostics.Process.GetProcessById(Int32 processId)
at Tester.Main()