Visual Basic - Ejecutar y Cerrar una aplicacion

Ejecuto una aplicacion desde BV con el shell luego quiero detener la misma como lo hago?

Para detenerla

Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

'Sub gnrCierraApp)
' Dim mlAplicacion As Long
' Dim mlResultado As Long
'
' mlAplicacion = FindWindow(vbNullString, "c:\app.exe")
' ' jigp
' If mlAplicacion <> 0 Then mlResultado = PostMessage(mlAplicacion,' &H10, 0&, 0&)
'
'End Sub

Quitale la comilla del inicio se la puse por la sangría