Dim Processes() As Process = Process.GetProcesses

        For Each Process As Process In Processes
            If Process.ProcessName = "notepad" Then
                Process.Kill()
            End If
        Next

これでどうでしょう。この場合"notepad"、つまりメモ帳が終了します。