Zufallszahlen

Hi.

Habe ein Problem mit dem Generieren einer Zufallszahl.
Ich benutze folgende Syntax:

Int((Obergrenze - Untergrenze + 1) * Rnd + Untergrenze)

entnommen aus der MSDN VB6.

Problem ist, dass die Zufallszahlen, auch deren Reihenfolge, immer dieselben sind… :frowning:

Hat jemand eine Idee?

Dankeschƶn…

Hallo,

Hat jemand eine Idee?

ja. ;.-)

 Randomize Timer 'Random auf Zufall initialisieren
 mx = 50
 mn = 30
 r = Int(Rnd() \* (mx - mn) + mn)

 r = Rnd(-1) 'Random zurücksetzen ...
 Randomize Timer '...und neu initialisieren.

Dankeschƶn…

Bitte. :wink:

Gruß, Rainer

vielen Dank, funktioniert :smile: