Hallo VBA Spezialisten!

Ich bin kein VBA Spezialist, habe aber für mein Roulettespiel ein Excel Programm erstellt und wollte dies überprüfen mit VBA Zufallszahlen. Dazu habe ich die Formel gleich gefunden. Int(Untergrenze + Rnd * ( Obergrenze – Untergrenze + 1 ) ) oder Int((upperbound - lowerbound + 1) * Rnd + lowerbound).

Mein Programm spielt auf die Chancen Rot/Schwarz, Pair/Impair und Passe/ Manque.

Das lustige an der Geschichte ist, das nach Erstellung der Zufallszahlen mit VBA Passe/Manque fast nur gewinnt und die anderen beiden fast nur verlieren. Da man beim Roulette eigentlich dauerhaft nicht wirklich gewinnen kann war ich nun verblüfft. Also habe ich mir die Mühe gemacht Random generierte Zufallszahlen zu erhalten. Mit diesen ist das Ergebnis nun realisatisch. Es schwankt umden Nullpunkt und de Zeroverluste fressen alle Gewinne.

Warum aber arbeitet die VBA Formel so falsch?

Hat irgendein Prof eine Antwort?

Warum gewinn gerade PS / M fast immer? Hat das mit dem Rundunugen zu tun?

Grüße

Tiger