Nevermind, found it:

VB Code:
  1. Dim hProcess As Long, lExitCode As Long
  2.     hProcess = OpenProcess(PROCESS_TERMINATE, False, Split(List1.Text, " - ")(0))
  3.     Call TerminateProcess(hProcess, lExitCode)
  4.     Call CloseHandle(hProcess)
  5.     Text1.Text = hProcess