+- Support Forums (https://www.supportforums.net)
+-- Forum: Categories (https://www.supportforums.net/forumdisplay.php?fid=87)
+--- Forum: Coding Support Forums (https://www.supportforums.net/forumdisplay.php?fid=18)
+---- Forum: Visual Basic and the .NET Framework (https://www.supportforums.net/forumdisplay.php?fid=19)
+---- Thread: [TUT]Make Multi Keygen In VB (/showthread.php?tid=6261)
[TUT]Make Multi Keygen In VB - RaZoR03 - 04-15-2010
Today i will show you how to make a simple keygen in VB.
![[Image: 244thd3.png]](http://i39.tinypic.com/244thd3.png)
What you will need.
2 TextBoxes
1 Button
Now rename,change,etc to make your keygen look nice.
When you have finished that,double click the button
Then enter paste the code from below..
And use your own serials..
Code:
TextBox1.Text = Int(Rnd() * 6)
Select Case TextBox1.Text
Case 0
TextBox1.Text = "1330-1813-5332-3018-4123-4267"
TextBox2.Text = "1330-1182-3585-9477-5524-4839"
Case 1
TextBox1.Text = "1330-1167-8857-3801-9962-4540"
TextBox2.Text = "1330-1246-4571-8394-1888-0838"
Case 2
TextBox1.Text = "1330-1182-3585-9477-5524-4839"
TextBox2.Text = "1330-1813-2281-9917-1754-3749"
Case 3
TextBox1.Text = "1330-1813-5332-3018-4123-4267"
TextBox2.Text = "1330-1814-7519-3975-0873-6968"
Case 4
TextBox1.Text = "1330-1011-6547-2116-7061-1195"
TextBox2.Text = "1330-1813-5332-3018-4123-4267"
Case 5
TextBox1.Text = "1330-1430-9860-3108-6588-8053"
TextBox2.Text = "1330-1147-9851-4130-3716-7375"
End SelectDone.
Enjoy
RE: [TUT]Make Multi Keygen In VB - cm31 - 04-15-2010
Thanks For The Add Mate Nice Work !!!
RE: [TUT]Make Multi Keygen In VB - ShuTdown - 04-15-2010
Looks nice GUI Is cool
RE: [TUT]Make Multi Keygen In VB - cm31 - 04-15-2010
Yes Its Very Nice
RE: [TUT]Make Multi Keygen In VB - Kewlz - 04-15-2010
can u tell me how did u make the Background
RE: [TUT]Make Multi Keygen In VB - phire nuk3r - 04-15-2010
Wow i thought things like this were alot more complicated.
After seeing this i may try and learn hot to code in vb.
Thanks for opening my eyes, and for the share