Hallo

ich habe ein kleines Programm geschrieben, das eigentlich Zufallszahlen testen sollte.



Wenn ich jetzt die MsgBox mit den Zufallszahlen aufrufe, kommt zwanzig mal die gleiche Zufallszahl. 3, 3, 3, 3, 3, 3, ...
Beim nächsten MsgBox-Aufruf kommt zwanzig mal eine andere Zufallszahl. 2, 2, 2, 2, 2, 2, ...

Weiß jemand, warum das so ist?

Entferne den Microsoft.VisualBasic Namespace aus deinem Projekt. Vergiss Ramdomize.
Zufallsgenerator nur EINMAL mit new erstellen!

Danke jetzt funktioniert es.

Was war jetzt das Problem?
Ist das was Visual-Basic-Internes?

Du mischt da 2 verschiedene Randomgenerator
Randomize ist für den Randomgenerator Rnd() (welchen du gar nicht benutzt) aus dem VB Namespace.

Dein 2. Fehler ist das wiederholte Erstellen von Random und dem damit verbundenen initialisieren des Seeds.

Les dir die MSDN Seite zu Rnd, Randomize und Random durch...

Oder mit anderen Worten:

Immer wenn du mit New Random() einen neuen Zufallszahlengenerator erzeugst, benutzt er als "Seed" den aktuellen Systemtimer. Der hat aber "nur" eine Auflösung von 1 Millisekunde. Während du also in deiner Schleife mehrmals hintereinander eine Zufallszahl abfragst, wird jedes Mal ein neues Random-Objekt erzeugt, in der Zwischenzeit sind aber nur Bruchteile von Millisekunden vergangen, der Systemtimer hat sich also nicht merklich verändert, der Seed bleibt für 1/1000 Sekunde identisch, folglich sind die erzeugten Zufallszahlen immer gleich.

Interessant.
Nochmal danke!