[ابو انس]

كود :

  Dim i() As Process = Process.GetProcessesByName("chrome")
       For Each Process As Process In i
           Process.Kill()
       Next

هذا الكود يقفل برنامج جوجل كروم استبدل انت اسم البرنامج باسم البرنامج الذي تريد
اما بخصوص الجزء من سؤالك بخصوص تغيير الاسم فلا اعرف