This Is A Simple How to make a Keygen in VB.NET and NO Im not using real Keys. But What You Would Do Is in the coding you would have to replace the X's with The key itself.

Step 1: Make a New Proect

Start Visual Basic 2010.
Make a New Windows Form Applications.

Step 2: Make 4 Labels

Make 4 Labels. One that says "64bit Key" and another for "32bit Key."
Make 2 other Labels that say "Key".

Step 3: Make 2 Text Boxes and 2 Buttons

Make 2 Text Boxes and 2 Buttons.
Name The Buttons Generate and Keep The Text Boxes Blank.

Step 4: Coding the Buttons

For the Generate Buttons (Buttons 1/2) Put this code in:
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