Arkadaşlar Insert tuşu ile hileyi açıp kapayabilmeniz için sadece bir adet timere ihtiyacınız olacak. Timeri yerleştirdikten sonra timerin üzerine tıklayıp " Enabled " yeri False ise True yapılacak. Daha sonra timere çift tıklayıp bu kodları yapıştırıyorsunuz.
If GetAsyncKeyState(Keys.Insert) = -32767 Then
If Label1.Visible = False Then
Label1.Visible = True
Me.Show()
Exit Sub
End If
If Label1.Visible = True Then
Label1.Visible = False
Me.Hide()
Exit Sub
End If
End If
If GetAsyncKeyState(Keys.Delete) = -32767 Then
Application.Exit()
Exit Sub
End If
Daha sonra Public Class Formun altınada bu kodu yapıştırıyorsunuz :
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Bunları yaptıktan sonra hileniz hem ınsert tuşu ile açılacak hemde delete tuşuna basıldığı zaman ise hile menünüz kapanacaktır.
İYİ OYUNLAR