PsX-Games

Bienvenue sur le Forum PsX-Games !
Pour découvrir entièrement le forum, merci de t'inscrire et ensuite de te présenter, ensuite vous aurez accès a l'immensité du forum, contenant de nombreux tutoriels très utiles !

Passez un agréable moment sur PsX-Games ! Merci.

PS : le forum, suite a des plaintes de la firme forumactif, subira des modifications prochainement ... nettoyage de certains topics et suppression de certains sujet de hack auront lieux

Cordialement. Le STAFF De PsX-Games
PsX-Games

             Bienvenue a toi Invité , nous sommes le Sam 10 Déc - 6:52. Nous avons 8595 membres enregistrées, et le dernier utilisateur enregistré est enes7574, et nous lui souhaitons la bienvenue ! N’hésitez pas a modifier votre profil en cliquant sur : Invité Passez un agréable moment sur PsX-Games !
Suite à la maintenance du 09/07, toutes les présentations ont été supprimé. Je vous invite donc à allez vous re-présentez.
Suite à la maintenance du 09/07, toutes les présentations ont été supprimé. Je vous invite donc à allez vous re-présentez.

    [VB.Net] Creer un KeyGen fake [ Ou vrai ^^ ]

    Partagez

    xFaNtAsTiiC.
    Habitué
    Habitué

    Messages : 102
    Réputation : 4
    Date d'inscription : 06/02/2011

    [VB.Net] Creer un KeyGen fake [ Ou vrai ^^ ]

    Message par xFaNtAsTiiC. le Jeu 2 Juin - 12:01

    Vous aurrez besoin de:

    -1 boutons (1: Generer)
    -1 Textbox
    (Vous pouvez ajouter une listbox ou un truc du genre avec les jeux marquer dessu pour faire plus vrais )

    Code:

    Bouton1 : (Générer)

    Code :
    TextBox1.Text = Int(Rnd() * 20) ' [le nombre 20 , ces le nombre de case!]
    Select Case TextBox1.Text
    Case 0
    TextBox1.Text = "Votre licence fake"
    Case 1
    TextBox1.Text = "Votre licence fake"
    Case 2
    TextBox1.Text = "Votre licence fake"
    Case 3
    TextBox1.Text = "Votre licence fake"
    Case 4
    TextBox1.Text = "Votre licence fake"
    Case 5
    TextBox1.Text = "Votre licence fake"
    Case 6
    TextBox1.Text = "Votre licence fake"
    Case 7
    TextBox1.Text = "Votre licence fake"
    Case 8
    TextBox1.Text = "Votre licence fake"
    Case 9
    TextBox1.Text = "Votre licence fake"
    Case 10
    TextBox1.Text = "Votre licence fake"
    Case 11
    TextBox1.Text = "Votre licence fake"
    Case 12
    TextBox1.Text = "Votre licence fake"
    Case 13
    TextBox1.Text = "Votre licence fake"
    Case 14
    TextBox1.Text = "Votre licence fake"
    Case 15
    TextBox1.Text = "Votre licence fake"
    Case 16
    TextBox1.Text = "Votre licence fake"
    Case 17
    TextBox1.Text = "Votre licence fake"
    Case 18
    TextBox1.Text = "Votre licence fake"
    Case 19
    TextBox1.Text = "Votre licence fake"
    Case 20
    TextBox1.Text = "Votre licence fake"
    End Select

    Ps: Vous pouvez changer le nombre de case ^^ Parceque c'est beaucoup 20 case xDu

    Voila vous avez finis votre propre keygen fake



    ---------------------------------
    ---------------------------------

    Cordialement ,

    xFaNtAsTiiC.
    Modérateur de PsX


    -xBox Live : Non
    -Skype : Non
    -Msn : Oui
    -PSN : Oui
    -GameCenter : Oui

    ---Appareil---

    iPod touch 4G

    ---Console---

    Playstation 3
    PSP

      La date/heure actuelle est Sam 10 Déc - 6:52