Dim processList() As Process
        processList = Process.GetProcessesByName("notepad")
        For Each proc As Process In processList
            proc.Kill()
        Next