Visual Basic. NET икемді және қуатты бағдарламалау тілі, Microsoft. NET платформасына арналған қосымшаларды жасау үшін арнайы құрылған құралдардың бірі, оның барлық мүмкіндіктерін толық пайдалануға мүмкіндік береді. Атап айтқанда, System. Diagnostics атау кеңістігінің компоненттері процестермен, оқиғалар журналдарымен және өнімділік есептегіштерімен өзара әрекеттесуге мүмкіндік береді. Мысалы, Visual Basic бағдарламасынан Process сыныбы арқылы бағдарламаны жабуға болады.
Қажетті
Microsoft Visual Studio
Нұсқаулық
1-қадам
Жүйені, System. Diagnostics және System. Threading атаулар кеңістігін импорттаңыз. Модульдің басына келесі код жолдарын қосыңыз:
Импорт жүйесі
Импорт жүйесі. Диагностика
Импорттау жүйесі
Бұл тек осы аттар кеңістігімен байланысты компоненттерді қолдануға ыңғайлы болу үшін.
2-қадам
Жабылатын процестің деректерін алыңыз. System. Diagnostics. Process класс объектісін қолданыңыз. Осы кластың айнымалысын жарияла:
Dim oProc процесс ретінде
Содан кейін қажетті процесті табу үшін бірнеше әдісті қолданыңыз.
3-қадам
Егер болашақта жабылуы керек бағдарлама әзірленіп жатқан қосымша арқылы іске қосылса, онда іске қосу кезінде Start әдісі арқылы қайтарылған нысанды сақтаңыз:
oProc = Process. Start («app.exe»)
4-қадам
Егер сізге белгілі идентификаторы бар процесті жабу керек болса, сәйкес объектіні алу үшін Process сыныбының статикалық GetProcessById әдісін қолданыңыз:
oProc = Process. GetProcessById (nID)
Мұндағы nID - процестің сандық идентификаторы.
5-қадам
Егер мақсатты процестің кейбір сипаттамалары ғана белгілі болса, оны іздеңіз. Жергілікті машинада Process классының объектілері жиыны ретінде жүретін процестер тізімін алыңыз. GetProcesses (барлық процестерді қайтарады) немесе GetProcessesByName (тек аталған атпен жүретін процестер) әдістерін қолданыңыз:
Dim aoAllProcesses Process () = Process. GetProcesses () ретінде
Dim aoProcsByName Process () = Process. GetProcessesByName («app.exe») ретінде күңгірт
Массив объектілерін тізбектің көмегімен тізімдеңіз:
Dim oProc процесс ретінде
Әр oProc үшін aoAllProcesses
oProc-тағы әрекеттер
Келесі
MainModule, MainWindowTitle, ProcessName және т.с.с. қажетті нысанды табу.
6-қадам
Бағдарламаны оның негізгі терезесіне жақын хабарлама жіберу арқылы тоқтатуға тырысыңыз. Мақсатты процеске сәйкес объектінің CloseMainWindow әдісін шақырыңыз. Қажет болса, WaitForExit қоңырау шалу арқылы өтінімнің аяқталуын күтіңіз, мысалы:
oProc. CloseMainWindow ()
oProc. WaitForExit ()
Бұл әдіс бағдарламаның тоқтатылуына кепілдік бермейді, өйткені терезені жабу туралы хабарлама жиі өңделеді және оны елемеуге болады.
7-қадам
Бағдарламаның аяқталуын қамтамасыз ету үшін CloseMainWindow шақырғаннан кейін қысқа уақытты күтіңіз. Thread класының ұйқы әдісін қолданыңыз. Содан кейін процесс күйін HasExited қасиетін тексеру арқылы тексеріп, егер ол аяқталмаған болса, Kill әдісін шақырыңыз:
Ұйқы (6000)
oProc. Refresh ()
Егер жоқ болса oProc. HasExited then
oProc. Kill ()
Аяқтау Егер
Қажет болса, сіз процедураның мәртебесін цикл бойынша сұрастыра аласыз, пайдаланушыға деректерді сақтамай қолданбаны тоқтату туралы мерзімді ұсыныстар бере аласыз. Егер сіз Kill-ге қоңырау шалуға келіссеңіз ғана.
8-қадам
Жабу әдісі арқылы бағдарлама аяқталғаннан кейін жүйелік ресурстарды босатыңыз:
oProc. Close ()
9-қадам
Бағдарламаны орындау кезінде күтпеген қателіктерді болдырмау үшін бағдарламаны жабудың барлық алгоритмін Try-Catch-End Try блогына орналастырыңыз. Қажет болса, диагностикалық хабарламалармен толықтай ерекше жағдайларды өңдеуді жүзеге асырыңыз.
