Visual Basic Forum

Visual Basic Forum
für VB6 und VB.NET Programmierer
  		RegistrierenRegistrieren  LoginLogin

Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten
Autor
Nachricht
TutHowto
Newbie
Newbie

Anmeldedatum: 01.08.2010
Beiträge: 1
Wohnort: Germany
Frage: Keygen!
Verfasst am: 01.08.2010, 09:13
Hey, also ich bin neu hier also nicht übel nehmen wenn ich etwas falsch mache Smile
Also ich habe eine Frage:
Ich hab einen Keygen mit Visual Basic erstellt. Er geht auch aber ich will das die ersten 4 Zahlen aus einer bestimmten Zahl bestehen und dann zufällige.
Hier ein Beispiel:
Ich will:
1234-1487-2650-1089-3540-9807
aber jetzt ist es so:
1247-9870-9850-1205-1203-9031

Ich hoffe ihr könnt mir helfen! Und ich bin erst neu in diesem Bereich also es wäre nett wenn mir einer den Code postet, denn ich in Button 1 z.B. reinschreiben muss! Der Aktuelle Code den ich nutze ist:
Code:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Clear()
Dim rnd As New Random
For i As Integer = 0 To 23
If i = 4 Or i = 8 Or i = 12 Or i = 16 Or i = 20 Then
TextBox1.Text &= "-"
End If
TextBox1.Text &= rnd.Next(0, 9)
Next
End Sub
End Class

_________________
Mfg TutHowto!
 
christopher.g
Überflieger
Überflieger

Anmeldedatum: 03.05.2008
Beiträge: 536

Verfasst am: 02.08.2010, 07:01
falscher themen bereich...

aber
machst halt
Code:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Clear()
TextBox1.Text = "1234-"
Dim rnd As New Random
For i As Integer = 5 To 23
If i =  8 Or i = 12 Or i = 16 Or i = 20 Then
TextBox1.Text &= "-"
End If
TextBox1.Text &= rnd.Next(0, 9)
Next
End Sub
End Class

_________________
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten

Tags: visual basic, keygen, beispiel, code

  
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge [suche] Tuturials winsock & daten senden 867 09.06.2011, 12:19
Keine neuen Beiträge [Video] *.dll & *.ocx Installer 2429 06.03.2008, 20:19
Keine neuen Beiträge ListView speichern & laden 1241 05.08.2008, 12:32
Keine neuen Beiträge Registry & Co Fragen 1101 03.05.2007, 09:57
Keine neuen Beiträge Listbox speichern & laden 2047 22.03.2007, 20:25
 




[ Time: 0.1612s ][ Queries: 85 (0.0315s) ][ GZIP on - Debug on ]