vba realistischer zufallszahlengenerator

Question

Ich weiß, dass ich eine Quasi-Zufallszahlengenerierungsfunktion/Variable namens Rnd verwenden kann. Allerdings ist mir aufgefallen, dass immer, wenn ich Rnd in meinem Benutzerformular verwendet habe, diese Zahlenfolge immer angezeigt wird:

erste Iteration: 0.705547511577606 zweite Iteration: 0.533424019813538 ...

Das Ergebnis ist, dass die Reihenfolge der angezeigten Zahlen jedes Mal dieselbe ist, wenn ich das Benutzerformular neu aufrufe, so dass es nicht zufällig wirkt. Gibt es andere Funktionen in der VBA-Funktionsgruppe, die es mehr zufällig fühlen würde? Vielen Dank im Voraus.

Answer 1

Versuchen Sie, einen einzelnen Aufruf von Randomize Timer bevor Sie irgendwelche Aufrufe an Rnd . Dadurch wird der Zufallszahlengenerator anhand der Tageszeit geimpft.

Answer 2

Ich weiß nicht viel über VB, aber ich denke, Sie müssen Samen Ihren Nummerngenerator. Ich denke Randomize tut es für VB.

Answer 3

Sie könnten den Seed manuell auf Basis der Tageszeit einstellen... fügen Sie etwas wie das Folgende oben in Ihren vba-Code ein:

For i = 0 To (CInt(Format(Time, "ms"))) 'minutes and seconds turned to integer
        test_random = Rnd()
    Next