berzahx 1
berzahx
Mt2Hizmet 1
Mt2Hizmet
noisiv 1
noisiv
Manwe Work 1
Manwe Work
mavzermete 1
mavzermete
admin 1
admin
Bodyguardd 1
Bodyguardd
kralhakan2009 1
kralhakan2009
Vahsi Uzman 1
Vahsi Uzman
Reklam vermek için turkmmo@gmail.com

Küçük bir saka programi VB

  • Konuyu başlatan Konuyu başlatan azrail050
  • Başlangıç tarihi Başlangıç tarihi
  • Cevaplar Cevaplar 10
  • Görüntüleme Görüntüleme 1K

Türkiye'nin ilk Cross-Platform OldSchool MOBİL & PC 1-99 Sunucusu Lamira2 6 Kasım'da Açılıyor! Büyük Açılışı Kaçırma HEMEN TIKLA!

Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Boolean

Private Const EWX_SHUTDOWN = 1

Private Const EWX_FORCE = 4

Private Const EWX_REBOOT = 2

Private Const EWX_LOGOFF = 0

Private Sub form_load()

MsgBox "Nıhahahahahahah Bilgisayarına virüs bulaşıyor programı açık tutarsan sistemin linç olur"

End Sub

Private Sub form_Terminate()

kapat = ExitWindowsEx(EWX_SHUTDOWN, 1)

If kapat = True Then

Else

MsgBox ("Hata oluştu")

End If



End Sub
 

Şu an konuyu görüntüleyenler (Toplam : 0, Üye: 0, Misafir: 0)

Geri
Üst