Detener procesos con Visual Basic.Net

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

'Creamos un array para colocar los procesos o subprocesos de lo que se este ejecutando
Dim ps() As Process = Process.GetProcessesByName("deletedr")
Dim rutaProceso As String

'Nos imprime desde consola la cantidad de procesos expuestos con el nombre anterior
'En este caso "deletedr"
Console.WriteLine("El path: {0}", ps(0).MainModule.FileName)

'Detiene el proceso permanentemente del equipo
ps(0).Kill()


End Sub
End Class