|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (ActiveX/Controles/DLL)
|
|
 |
Título da Dica: FINALIZAR PROCESSO E FINALIZAR ÁRVORE DE PROCESSO
|
 |
|
|
|
Postada em 2/4/2007 por ¨Hennyere¨
jhennyere@yahoo.com.br
Private Declare Function GetCurrentThread Lib "kernel32" () As Long
Private Declare Sub ExitThread Lib "kernel32" (ByVal dwExitCode As Long)
Private Declare Function GetExitCodeThread Lib "kernel32" (ByVal hThread As Long, lpExitCode As Long) As Long
Private Declare Sub ExitProcess Lib "kernel32" (ByVal uExitCode As Long)
Private Declare Function GetExitCodeProcess Lib "kernel32" (ByVal hProcess As Long, lpExitCode As Long) As Long
Private Declare Function GetCurrentProcess Lib "kernel32" () As Long
Private Sub FinalizarArvProcesso()
ExitThread GetExitCodeThread(GetCurrentThread, 0)
End Sub
Private Sub FinalizarProcesso()
ExitProcess GetExitCodeProcess(GetCurrentProcess, 0)
End Sub
'Josefh Hennyere
|
|
|
|
|
