Процесс explorer.exe
 

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colProcessList = objWMIService.ExecQuery _
("SELECT * FROM Win32_Process WHERE Name = 'explorer.exe'")
For Each objProcess in colProcessList
objProcess.Terminate()
Next

Процесс завершается, но через 3 секунды снова запускается.

gale, за это отвечает параметр AutoRestartShell по идее.

А не проще:
Убивает наповал :)

Maza Faka, оно конечно проще, но появляется чёрное консольное окно, что некрасиво.

Осмелюсь задать ещё один вопрос.
Когда пользователь первый раз входит в систему, explorer.exe долго грузится.
Можно ли создать такую программу, которая отслеживала бы загрузку оболочки?
Переменная возвращает значение false, если оболочка ещё не полностью загрузилась, и true, если полностью.

Для чего это нужно?
Хочу удалить ярлык IE в панели быстрого запуска.
Он удаляется, но слишком рано.
Приходится перезагружать компьютер.