Imports SystemImports System.DiagnosticsImports System.ComponentModelClass MyProcess Shared Sub Main() Dim currentProcess As Process = Process.GetCurrentProcess() End SubEnd Class