Imports SystemImports System.DiagnosticsImports System.ComponentModelClass MyProcess Shared Sub Main() Dim ipByName As Process() = Process.GetProcessesByName("notepad", "169.0.0.0") End SubEnd Class