როგორ დავხუროთ პროგრამა Visual Basic– დან

Სარჩევი:

როგორ დავხუროთ პროგრამა Visual Basic– დან
როგორ დავხუროთ პროგრამა Visual Basic– დან

ვიდეო: როგორ დავხუროთ პროგრამა Visual Basic– დან

ვიდეო: როგორ დავხუროთ პროგრამა Visual Basic– დან
ვიდეო: Visual Basic Program Example 2024, ნოემბერი
Anonim

მოქნილი და მძლავრი პროგრამირების ენა Visual Basic. NET, რომელიც წარმოადგენს ერთ-ერთ სპეციალურად შექმნილ ინსტრუმენტს Microsoft. NET პლატფორმისთვის პროგრამების განვითარებისათვის, საშუალებას გაძლევთ სრულად გამოიყენოთ მისი ყველა შესაძლებლობა. კერძოდ, System. Diagnostics სახელების სივრცის კომპონენტები საშუალებას გაძლევთ ურთიერთქმედებდეთ პროცესებთან, მოვლენების ჟურნალებთან და შესრულების მრიცხველთან. მაგალითად, შეგიძლიათ დახუროთ პროგრამა Visual Basic– დან, პროცესის კლასის გამოყენებით.

როგორ დავხუროთ პროგრამა Visual basic– დან
როგორ დავხუროთ პროგრამა Visual basic– დან

აუცილებელია

Microsoft Visual Studio

ინსტრუქციები

Ნაბიჯი 1

იმპორტი სისტემა, სისტემა. დიაგნოსტიკა და სისტემა. მოდულის დასაწყისში დაამატეთ კოდის შემდეგი ხაზები:

იმპორტის სისტემა

იმპორტის სისტემა. დიაგნოსტიკა

იმპორტის სისტემა

ეს მხოლოდ ამ სახელების სივრცეებთან დაკავშირებული კომპონენტების გამოყენების მოსახერხებელია.

ნაბიჯი 2

მიიღეთ პროცესის დახურვის მონაცემები. გამოიყენეთ System. Diagnostics. Process კლასის ობიექტი. ამ კლასის ცვლადის გამოცხადება:

Dim oProc როგორც პროცესი

შემდეგ გამოიყენეთ გარკვეული მეთოდი, რომ იპოვოთ საჭირო პროცესი.

ნაბიჯი 3

თუ პროგრამა, რომლის დახურვაც მომავალში უნდა განხორციელდეს, იწყებს შემუშავებულ პროგრამას, მაშინ უბრალოდ შეინახეთ Start მეთოდით დაბრუნებული ობიექტი:

oProc = Process. Start ("app.exe")

ნაბიჯი 4

თუ თქვენ გჭირდებათ პროცესის დახურვა ცნობილ იდენტიფიკატორთან, გამოიყენეთ პროცესის კლასის სტატიკური GetProcessById მეთოდი შესაბამისი ობიექტის მისაღებად:

oProc = Process. GetProcessById (nID)

სადაც nID არის პროცესის რიცხვითი იდენტიფიკატორი.

ნაბიჯი 5

თუ სამიზნე პროცესის მხოლოდ ზოგიერთი მახასიათებელია ცნობილი, მოძებნეთ იგი. მიიღეთ ადგილობრივ მანქანაზე მიმდინარე პროცესების ჩამონათვალი, როგორც პროცესის კლასის ობიექტების მასივი. გამოიყენეთ GetProceses (აბრუნებს ყველა პროცესს) ან GetProcesesByName (მხოლოდ პროცესები მოცემული სახელით):

Dim aoAllProceses როგორც პროცესი () = პროცესი. GetProceses ()

Dim aoProcsByName როგორც პროცესი () = Process. GetProcesesByName ("app.exe")

ჩამოთვალეთ მასივის ობიექტები მარყუჟის გამოყენებით:

Dim oProc როგორც პროცესი

თითოეული oProc პროცესისთვის aoAllProcesses

'მოქმედებები oProc- ზე

შემდეგი

შემოიხედე MainModule, MainWindowTitle, ProcessName და ა.შ. სასურველი ობიექტის პოვნა.

ნაბიჯი 6

შეეცადეთ შეწყვიტოთ პროგრამა მთავარ ფანჯარასთან მჭიდრო შეტყობინების გაგზავნით. დარეკეთ ობიექტის CloseMainWindow მეთოდზე, რომელიც შეესაბამება სამიზნე პროცესს. საჭიროების შემთხვევაში, დაელოდეთ განაცხადის დასრულებას WaitForExit– ით დარეკვით, მაგალითად:

oProc. CloseMainWindow ()

oProc. WaitForExit ()

ეს მეთოდი არ იძლევა პროგრამის შეწყვეტის გარანტიას, რადგან ფანჯრის დახურვის შეტყობინება ხშირად მუშავდება და მისი უგულებელყოფა შეიძლება.

ნაბიჯი 7

დაველოდოთ მოკლე დროში CloseMainWindow– ზე დარეკვის შემდეგ, რომ პროგრამა შეწყდეს. გამოიყენეთ ძაფის კლასის ძილის მეთოდი. შემდეგ შეამოწმეთ პროცესის სტატუსი HasExited თვისების შესწავლით და, თუ ის არ დასრულებულა, დაურეკეთ Kill მეთოდს:

თემა. ძილი (6000)

oProc. Refresh ()

თუ არა oProc. HasExited მაშინ

oProc. Kill ()

Დაასრულე თუ

სურვილის შემთხვევაში, თქვენ შეგიძლიათ გამოკითხოთ პროცესის სტატუსი მარყუჟში, პერიოდულად მიუთითოთ მომხმარებელი, შეაჩეროს განცხადება მონაცემების დაზოგვის გარეშე. და მხოლოდ იმ შემთხვევაში, თუ თქვენ ეთანხმებით კილს დაურეკეთ.

ნაბიჯი 8

გაათავისუფლეთ სისტემის რესურსები პროგრამის დასრულების შემდეგ დახურვის მეთოდის გამოყენებით:

oProc. Close ()

ნაბიჯი 9

აპლიკაციის შესრულების დროს მოულოდნელი შეცდომების თავიდან ასაცილებლად, პროგრამის დახურვის მთელი ალგორითმი მოათავსეთ Try-Catch-End Try ბლოკში. აუცილებლობის შემთხვევაში, განახორციელეთ გამონაკლისის სრულფასოვანი მართვა დიაგნოსტიკური შეტყობინებებით.

გირჩევთ: