Visual Basic - Cerrar aplicaciones

Hola a todos, a ver si me pueden ayudar, quisiera saber como cierro una aplicación abierta con shell, yo abro el programa de la siguiente manera:

stprograma = "" & App.Path & "calc.exe"
ventana = ShellExecute(Me.hwnd, vbNullString, stprograma, vbNullString, App.Path, 3)

he probado a cerrarlo así:
AppActivate ventana
SendKeys "%{F4}", True
pero no me funciona, si me pudieran decir alguna otra manera de cerralo o decirme que es lo que hago mal.
Gracias.

Ya he solucionado el problema, pero de todas maneras gracias por tu ayuda.
Una duda, pq pones PROGRAMADOR en mayusculas, me lo puedes explicar