The Codes Needed in the keygen are:
-----------------------
Close Button :
End
-----------------------
Form1 Code :
Textbox1.Enabled = False *OpTiOnAl*
-----------------------
Generate Button Code :
Textbox1.Enabled = True
Dim Key As Integer
Key = (rnd() *5 )
Select Case Key
Case 1
Textbox1.text = "Serial Key Here!"
Case 2
Textbox1.text = "Serial Key Here!"
Case 3
Textbox1.text = "Serial Key Here!"
Case 4
Textbox1.text = "Serial Key Here!"
Case 5
Textbox1.text = "Serial Key Here!"
-------------------------------------------
**!!!ENJOY!!!**
**!!!ENJOY!!!**
No comments:
Post a Comment