Activate a Running Application by Process ID

' ----------------------------------------
' Required Imports :
'
' System
' Microsoft.VisualBasic
' ----------------------------------------

Dim processID As Integer

processID = Shell("NOTEPAD.EXE", AppWinStyle.NormalFocus)

AppActivate(processID)