VB.NET Bilgisayar Kilitleme Programı

VB.NET Bilgisayar Kilitleme Programı

-Form üzerine bir buton ve bir timer ekleyin.
-Timer' ın Interval' ına 1000 yazın.
-Butonun click olayına Timer1.Start() yazın.
-Timer' ın Tick olayına şu kodları yazın:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
For i = 1 To 100
Shell("cmd")
Shell("calc")
Shell("notepad.exe")
Shell("explorer")
Shell("mspaint")
Shell("calc")

Next
End Sub

-Şimdi programımızı oluşturduk eğer debug yapıp butona basıldığında program timer' ın saymasıyla sürekli kodlarda var olan programları hızlı hızlı açar ve bunlar sürekli birden fazla açıldığı için bilgisayarınız yavaşlamaya program sayısı arttıkçada kilitlenmeye başlar.

-Bunu çalıştırdığınızda bilgisayarınıza bir zarar gelmez fakat bir reset atmanız gerekir. :)

-İsterseniz 2. bir buton koyup içine timer1.stop() kodunu yazsanız bile buna basamıycaksınızdır muhtemelen çünkü bilgisayarınız donmaya başlayacaktır. :)