[vb 6.0]chiudere un processo

[meronet]

Caio a tutti
sembra di ritornare alla preistoria
ma dovrei chiudere un applicazione tipo notepad da
vb 6.0

quest'applicazione viene aperta semplicemente facendo
Dim res As Double
res = Shell("programma.exe", vbNormalFocus)
proprio perche l' ho installata in c:\windows\system32\

[meronet]

chiuso il processo
Dim objs As Variant
For Each objs In GetObject("winmgmts:").ExecQuery("SELECT * FROM Win32_Process WHERE Name='notepad.exe'")
objs.Terminate
Next

[alka]

Se ne sta già parlando in questa sede.