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 2: Make 4 Labels
Make 4 Labels. One that says "64bit Key" and another for "32bit Key."
Make 2 other Labels that say "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.
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
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
Tags
articles