Public Shared Function killMyFile(ByVal procName As String, Optional ByVal all As Boolean = True) As Boolean
Dim val As Boolean = False
For Each procInstance As Process In Process.GetProcesses
If procInstance.ProcessName.ToLower = procName.ToLower Then
procInstance.Kill()
val = True
If Not all Then Exit For
End If
Next
Return val
End Function
killMyFile("MyFile.bat")

killMyFile("MyFile")

Dim pProcess() As Process = System.Diagnostics.Process.GetProcessesByName("cmd")
For Each p As Process In pProcess
p.Kill()
Next