PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : [VB.NET] ZufallsZeichenFolge



staebche
08.04.2009, 18:50
also mein anliegen heut =)

ich möchte über einen button eine zufällige zeichenfolge
( zB "1lf32a?=SADC*'Y#asc/9" ) in eine textbox übergebn.
hab bei google leider nichts gefunden mit sonderzeichen
und mehrstelligen zeichen.

enco
08.04.2009, 21:52
Such hier mal nach Passwortgeneratoren. Gibt glaube ich ein paar Beispiele im Forum.

Sirect
08.04.2009, 22:38
Public Function Zufallsstring()
Dim Output As String = ""
Dim focus As New Random
Dim change As Integer
change = focus.Next(11, 13)
For i = 1 To change
Dim generator As New Random
Dim randomValue As Integer
randomValue = 0
randomValue = generator.Next(3, 4) ' Die 3 und 4 kannste Variieren, 1-4 ist groß, klein und Zahlen.
System.Threading.Thread.Sleep(25)
Select Case randomValue
Case 1
randomValue = generator.Next(48, 57)
Output &= Chr(randomValue)
Application.DoEvents()
randomValue = 0
Case 2
randomValue = generator.Next(65, 90)
Output &= Chr(randomValue)
Application.DoEvents()
randomValue = 0
Case 3
randomValue = generator.Next(97, 122)
Output &= Chr(randomValue)
Application.DoEvents()
randomValue = 0
End Select
Next
Return Output
End Function
' Sirect mag Credits!


=)

Wie bin ich auf "focus" und "change" gekommen?

change ist die Länge des Strings.

RaZz0r
08.04.2009, 22:38
Have Fun und so



TextBox1.Text = vbNullString
For X = 1 To 10
TextBox1.Text = TextBox1.Text & Mid("ABCDEFGHIJKMNOPQRSTUVWXYZ0123456789", Int((Rnd() * Len("ABCDEFGHIJKMNOPQRSTUVWXYZ0123456789")) + 1), 1)
Next X

br00_pwn
08.04.2009, 22:42
käse lol
verwechselt

RaZz0r
08.04.2009, 22:52
Erzeugt 10 Strings der Länge 16 mit erlaubten Zeichen:



String allowedChars ="0123456789abcdefghijklmnopqrstuvwxyz";
Random random = new Random();
for (int i=0; i<10; i++) {
String randomString = generateRandomString(allowedChars, random);
System.out.println(randomString);
}
}

private static String generateRandomString(String allowedChars,
Random random) {
int max = allowedChars.length();
StringBuffer buffer = new StringBuffer();
for (int i=0; i<16; i++) {
int value = random.nextInt(max);
buffer.append(allowedChars.charAt(value));
}
return buffer.toString();
}
Ist das VB? Nein

staebche
09.04.2009, 00:37
hab das gleiche wie razzor es gepostet hat
aus dem source von the papst geklaut =)
natürlich nur den generator ;)

danke trzdem an alle.