How to make a keygen using vb.net

How To Make a keygen using vb.net

Source: coderforums

For support and suggestions please visit idealprogrammer forums

Description:
A keygen means a program that generate keys for a certain program.

Preparation: Steps:
1. Create a project
Open Visual Basic 8 and create a Windows Form Application. Name it as the keygen you want to make. In this tutorial, i will make a Windows 7 Keygen as an example.
http://img220.imageshack.us/img220/5807/88902635.png

2. Edit the project properties
When you’ve done creating the project, now you have to change the project’s properties. In the box at the bottom right hand side of the project, that’s where you change the properties for everything. Click on the form and change the properties as below:
http://img213.imageshack.us/img213/3620/65636137.png

3. Adding items into your project
Now you should add some items into your keygen. These are the things you should contain in a keygen:
To add items into your keygen, look at the toolbox at the left of your project. Simply drag the item that you want and put it into your project. It will appear there, and you can put it in where you like.

4. Finding a logo
Now you should find a logo to put into your keygen. The logo must be related to the program of the keygen. You can google the logo of the program and add some text into it.

This is what i made for mine:
http://img32.imageshack.us/img32/5243/windowsicon2.png

Once you got your logo ready, insert a PictureBox into your project and insert the picture into it.

5. Insert the data into your project
Once you’ve inserted your logo, you can start to put in the required data into your project.
Insert a label and change the Text to "Select the version you want:" or something like that. Once you’ve done that, you can now proceed to the ComboBox/RadioButton. Here i will use ComboBox because it’s much more easier to use. To change the data in the ComboBox, click on the ComboBox and click Items in the Properties.

6. Inserting your keys into the keygen
Now you can start inserting the keys into your keygen. These keys will be shown when you click the Generate Button.
Double click the Generate button and paste the following into the code:

7. Finalizing and building your keygen
Now you have already reached the last step of building your keygen! Press F5 and debug your project and test whether the buttons are working or not. When you’re done, click Build on the top menu and click Build {ProjectName}.
http://img297.imageshack.us/img297/6214/67805702.png
To see your built keygen, go to Documents\Visual Studio 2022\Projects\{ProjectName}\{ProjectName}\Bin\Rele ase\{ProjectName}.exe

——————————————————–

And now you’re done! I’ll provide you the exe for my project here…
exe file download:
 

  1. Get Visual Basic if you don’t have it (Download link)
  2. Think of what should your keygen be (e.g. Windows Key Generator, Kaspersky Keygen and such)
  3. Plan on what you want to include in your keygen
  4. Plan on what you should include in your keygen
  5. [optional] Getting an icon (You convert any image file to an icon file here.

 

  • Text – Change it to the title of the keygen you want.
  • Icon – Changing the icon can make it looks more professional. If you don’t want to show an icon, turn ShowIcon to False
  • FormBorderStyle – You can leave it there, or change to a style you like. Usually i change it to FixedSingle, because people won’t be able to resize the program.

 

  • Button – To generate the key after you clicked it
  • Textbox – To show the key after you clicked the button
  • Title – Some texts can be the on the top of the keygen, but adding a picture as a title will make it looks professional
  • ComboBox/RadioButton – If you have multiple type of keys to generate, this is a must have.
  • Labels – To tell people what is the function for.

 

Code:
TextBox1.Text = Int(Rnd() * 4)
        Select Case TextBox1.Text
            Case 0
                TextBox1.Text = "XXXXX-XXXXX-XXXXX-XXXXX-XXXXX"
            Case 1
                TextBox1.Text = "XXXXX-XXXXX-XXXXX-XXXXX-XXXXX"
            Case 2
                TextBox1.Text = "XXXXX-XXXXX-XXXXX-XXXXX-XXXXX"
            Case 3
                TextBox1.Text = "XXXXX-XXXXX-XXXXX-XXXXX-XXXXX"
            Case 4
                TextBox1.Text = "XXXXX-XXXXX-XXXXX-XXXXX-XXXXX"
            Case 5
                TextBox1.Text = "XXXXX-XXXXX-XXXXX-XXXXX-XXXXX"
        End Select

Replace the XXXXX-XXXXX-XXXXX-XXXXX-XXXXX with some random numbers and alphabets.
http://img213.imageshack.us/img213/1672/92874144.png

Code:
http://www.megaupload.com/?d=RO30OWNP

Project download:

Code:
http://www.megaupload.com/?d=BO6ZVY2U