- - Microsoft Visual Studio.
Imports System
Imports System.Diagnostics
Imports System.Threading
Це потрібно просто для зручності використання компонентів, що відносяться до даних просторів імен.
Dim oProc As Process
Потім використовуйте який-небудь метод для знаходження необхідного процесу.
oProc = Process.Start ("app.exe")
oProc = Process.GetProcessById (nID)
Тут nID - числовий ідентифікатор процесу.
Dim aoAllProcesses As Process () = Process.GetProcesses ()
Dim aoProcsByName As Process () = Process.GetProcessesByName ("app.exe")
Перерахуйте об'єкти масиву за допомогою циклу:
Dim oProc As Process
For Each oProc In aoAllProcesses
'Дії над oProc
Next
У циклі аналізуйте властивості MainModule, MainWindowTitle, ProcessName, і т.д. для знаходження потрібного об'єкта.
oProc.CloseMainWindow ()
oProc.WaitForExit ()
Даний метод не гарантує завершення програми, оскільки повідомлення закриття вікна часто обробляється і може бути проігноровано.
Thread.Sleep (6000)
oProc.Refresh ()
If not oProc.HasExited Then
oProc.Kill ()
End If
При бажанні можна здійснювати опитування стану процесу в циклі, видаючи періодичні запити користувачеві про необхідність завершення програми без збереження даних. І тільки в разі згоди викликати Kill.
oProc.Close ()