Guten Morgen zusammen,heute möchte ich euch etwas über die Random Funktion in VB.NET erzählen, sprich wir wollen Zufallszahlen erzeugen lassen. Vorteile wie Nachteile werden erklärt. Und eins zwei Beispiele werden auch dabei sein. Also fangen wir gleich an.Der Begriff "zufällig" ist hier nicht komplett richtig, da man in VB an bestimmte Grenzen gebunden ist. So kann VB nur auf eine endliche Menge an Zahlen zurückgre ...
Verfasst am: 05.10.2007, 10:08 Aufrufe: 1516
Mir ist die Methode viel zu aufwendig, dann muss man ja für jeden Möglichen Buchstaben eine Zeile Schreiben und man kann die Passwort Länge nicht so einfach Variieren. Bei der Methode die Zufallszahlen einzeln zusammen zuschreiben und somit die Länge nicht Dynamisch berechnen zu können frage ich mich manchmal wozu es Schleifen gibt. Wenn man das zusammensetzen des Passworts in einer For Schleife macht kann man die An ...
Verfasst am: 28.09.2007, 12:14 Aufrufe: 551
Da besteht folgendes problem,es kommen immer die selben zahlen beim programm start,in einer festen reihenfolge
gibts einen anderen befehl?^^
Das ist immer dann wenn du nur rnd nimmst und nicht erst Randomize aufrufst. Du solltest immer das erste mal bevor du rnd aufrufst Randomize aufrufen, das liegt daran dass der Computer eigentlich keine Zufallszahlen Berechnen kann sondern diese aus irgendwelchen Zahlen be ...
Verfasst am: 22.07.2007, 19:25 Aufrufe: 868
Das mit den Zufallszahlen is schon mal gut. Jetzt teilst du dir die 100 in Abschnitte ein(0-10,11-20,21-30,...) Dann fragste in einer If-Anweisung in welchem Abschnitt die Zahl liegt und je nach dem wie die Zufallszahl ausfällt, gibt dein Button einen bestimmten Satz aus deiner txt Datei aus.
Verfasst am: 06.05.2007, 17:43 Aufrufe: 572
Ich brauche ein Programm, was aus 100 Zufallszahlen im Bereich von 1 - 1000 die kleinste und größte ausgibt.
Dazu hab ich auch schon was geschrieben, nur ich find den Fehler nicht.
[code]Private Sub Form_Load()
Dim vArray As Variant
Dim imin, imax As Integer
Dim i As Integer
ReDim vArray(0 To 999)
For i = 0 To 99
vArray(i) = Int((Rnd * 1000) + 1)
Next i
For i = 0 To UBound(vArray)
If (imax ...
[ Time: 0.1644s ][ Queries: 87 (0.0465s) ][ GZIP on - Debug on ]