private sub killDuplicateProcess(pro_name as string)
Dim pro() As Process = System.Diagnostics.Process.GetProcessesByName(pro_name)
For Each i As Process In pro
i.Kill()
Next
end sub
''This function kill the process of given name in system
