Hallo,

habe im Programm eine Funktion, die einen Zufallswert ausspucken soll. Wenn diese Funktion direkt hintereinander ausgeführt wird spuckt sie allerdings immer das gleiche Ergebnis aus. Wenn ich das Programm beende und neu starte bekomme ich andere Werte.
Hat jemand einen Tipp was da falsch läuft?

Du musst die Deklaration und Instanzierung von RandomClass global machen. Also aus der Function raus in die Klasse.

Nebenbei:
Option Strict On!

Und auch:
Bitte VB Tags benutzen - was ist damit gemeint?

Objekte der Random-Klasse generieren jeweils eine Folge von Zufallszahlen.
Wenn du jedesmal ein neues Random-Objekt erstellst, bekommst du jedesmal die erste Zahl dieser Folge.

Genau - weil der Random nur ein Pseudozufallsgenerator ist d.h. die Zahlen werden eigentlich berechnet, und diese Berechnung ist von der Systemzeit abhängig.

Ein Problem bekommt man nur, wenn man zwei unabhängig von einander laufende Prozesse hat, welche zur gleichen Zeit starten und eine Zufallszahl generieren(z.B. um sich bei einem Server zu anzumelden).
Ich hatte dieses Problem einmal und bin bei der simplen Lösung hängen geblieben die ProzessID zu addieren. Denke aber kaum, dass du dieses Problem haben wirst. Nur falls jemand der einmal sucht auf diesen Thread stoßen sollte.

Niko Ortner schrieb:

Du musst die Deklaration und Instanzierung von RandomClass global machen. Also aus der Function raus in die Klasse.

Hm, und wie sähe das auf meinen Code angewendet dann aus?

@tolox:


Zur Erklärung:

Die lokale Variable wird bei jedem Aufruf von Bar() neu zugewiesen.
Die globale Variable wird nur beim Instanzieren der Klasse Foo einmal zugewiesen.