Dator > hur man gör en keygen i Visual Basic

  • hur man gör en keygen i Visual Basic


  • De flesta kommersiella programvaror använder någon form av slumpmässiga nycklar för att autentisera och registrera en legitim kopia när programmet är installerat . Vanligtvis är detta en serie av slumpmässiga bokstäver grupperade i olika antal bokstäver . Till exempel kan du se denna sekvens : DXUWB-GPHQE-CCNYQ-QFHAT-ZFBLO på en licensierad program . Specialiserad mjukvara kallade Key Generators, eller keygen skapar dessa koder men du kan göra din egen med bara 16 rader med Visual Basic -kod
    1 .
    Starta ett nytt projekt i Visual Basic , välja " Standard . EXE " mall i listan som erbjuds under " File " och " Nytt projekt . "Klicka på "Fil ", " Spara projekt som " och namn både form och projektet " MyKeyGen " när du ombeds .
    2 .
    Lägg
    en " CommandButton kontroll i den öppna formen genom att dubbelklicka på denna kontroll i verktygslådan till vänster på skärmen . Denna kontroll är en ikon formad som en liten rektangel . Normalt är det den tredje kontrollen anges i högra kolumnen i verktygslådan . Lägg till en etikett till den form på samma sätt . Etiketten ikonen är ett stort bokstaven "A " i verktygslådan .
    3 .
    Klicka på den nya " Kommando1 "knappen nu i formuläret för att fokusera på sina fastigheter i "Egenskaper " panel till höger. Dubbelklicka på " ( namn) " egendom för att markera standardnamnet " Kommando1 . " Ändra detta namn till " keygen " . Klicka på rubriken egendom och ändra det till " Generate Key " . Klicka på den nya Label1 i formuläret och göra dessa ändringar i dess egenskaper .

    radera bildtexten namn
    Bläddra nedåt i fastigheter listan tills du hittar " Höjd " och ändra detta till 500 .
    Bläddra till slutet av fastigheterna och ändra " Bredd " till 1200 .
    4 .
    Klicka på "Visa " i huvud Visual Basic -menyn längst upp och valde " kod ". Detta öppnar fönstret Kod där du ska skriva dessa rader exakt som de visas :

    Option Base 1
    Option Explicit
    Private Sub KeyGen_Click ( )
    Dim n As Integer
    Dim KeyGen (26) As Long
    Dim NEWKEY , FinalKey As String
    Slumpa
    för n=1 till 26
    keygen ( n)=Int (RND * 26 ) + 1
    keygen ( n)=keygen ( n ) + 64
    NEWKEY=Chr $ ( keygen ( n ) )
    FinalKey=FinalKey + NEWKEY
    Nästa
    FinalKey=Vänster ( FinalKey , 5 ) + "- " + Mid ( FinalKey , 6 , 5) + "- " + Mid ( FinalKey , 11 , 5) + "- " + Mid ( FinalKey , 17 , 5 )
    Label1 . Caption=FinalKey
    End Sub
    5 .
    Spara projektet genom att klicka på " File " och " Spara projekt. " Tryck på " F5 "för att köra programmet . Deklarationerna på raderna som börjar " Dim " ange hur programmet variabler används . " KeyGen (26) " skapar en array av variabler med 26 möjligheter och " Option Base 1 " säkerställer den första av de 26 är numrerade ett . " Slumpa " genererar en ny slumptalsfrö varje gång programmet körs . Resten av linjer skapar en serie av slumptal , som sedan omvandlas till bokstäver . Eftersom ASCII -kod för alfabetet börjar med ASCII 65 , måste vi lägga till 64 på varje slumptal före ombildningen. I slutändan är en lista över fyra uppsättningar slumpmässiga bokstäver åtskilda av bindestreck skapas och visas i rutan Etikett .

    tips och varningar


  • Om du behöver en längre rad viktiga brev , lägga till en extra segment till slutet av raden som börjar " sista nyckeln=Vänster ( Finalkey , 5 ) " . Sätt i slutet av denna linje följande kod :
  • + "- " + Höger ( FinalKey , 5 )
  • att skapa fyra brev sekvenser eller ändra antalet bokstäver i varje grupp , ändra femmor i FinalKey linje till andra nummer .
  • använda vektorer kan vara svårt , speciellt när du ställer en gräns för det maximala antalet och använda upprepande sekvenser . Om du får ett meddelande " Run-time error 9 , nedsänkt utanför intervallet , " du har angett ett större antal i en av de linjer än arrayen kan hålla .

Previous:nothing Next:vad är meningen med en prolog programmeringsspråk





Relaterade artiklar


  • hur man använder rullningslisten med listboxen i Visual Basic 6.0
  • Hur konvertera en kalenderdag till en sträng
  • hur man läser textfiler med Visual Basic
  • Hur gör jag beständighetsprovningen hårdvara när man bygger en dator?
  • hur du uppgraderar hårdvaran i en Inspiron 6400
  • Game Maker plattform handledning
  • hur man kan övervaka nätverkshårdvara
  • data recovery hårdvara
  • hur du exporterar en kontakta MSN Messenger Yahoo Messenger
  • gemensamma teckensnitt