আজ
আমরা দেখব ভিবি ব্যাবহার করে কিভাবে কোন রানিং প্রোসেস বন্ধ করা যায় !
Private Sub Command1_Click()
TerminateProcess ("calc.exe")
End Sub
Private Sub TerminateProcess(app_exe As String)
Dim Process As Object
For Each Process In GetObject("winmgmts:").ExecQuery("Select Name from Win32_Process Where Name = '" & app_exe & "'")
Process.Terminate
Next
End Sub
উপরের
কড গুলো একটা ফর্মের উপর পেস্ট মারেন এন্ড ফর্মে একটা বাটন নেন !
এখন
কাহিনি হইল বাটনের কাজ TerminateProcess ফাংশনে ডাকা ! ওকে ?
আর
টার্মিনীট ফাংশন কি করবে ?
Calc.exe এইই প্রোসেস বন্ধ করবে !
কিভাবে
করবে ?
তাইলে
ফাংশনে ঢুকে পড়ি
Private Sub TerminateProcess(app_exe As String)
এর মানে TerminateProcess নামের একতি ফাংশন ক্রিয়েট করা যার প্যারামিটার (app_exe As String)
মানে
app_exe একটা
স্ট্রিং হিসেবে ইনপুট নিবে যা আমরা কমান্ডে ক্লিক করলে ইনপুট দিচ্ছি :3
এর
পরে Process নামের
একতাআ ভ্যারিয়াবল কল করছি যার টাইপ হইল object
আর
For Each Process In GetObject("winmgmts:").ExecQuery("Select Name from Win32_Process Where Name = '" & app_exe & "'")
এই
কোড দ্বারা বোঝান হচ্ছে প্রোসেস্র এড্রেস কল করা !
" & app_exe & "'") এর মানে
কমান্ডে ক্লিক করলে সে calc.exe কে এসাইন করা !
এর
পরে
Process.Terminate
এইটা
দ্বারা আর কি বুঝাবে ?
ওই প্রোসেস পাইলে তা Terminate করা !
কোন প্রশ্ন থাকলে মন খুইলা জিগাতে পারেন :3 :3
