Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Zufallszahlen von 1-8 (ohne 5)
Autor: me36835
Datum: 12.03.06 20:15
Hallo Tagedieb, die Antwort, weshalb Dein Code nicht funzt, ist ganz einfach. Die Variable i hat, wenn sie mit Dim i As Integer angelegt wird den Startwert 0. Daher sind Deine Until-Bedingungen i <> 5 bzw i <> 3 erfüllt. Bei Deiner Konstruktion wird die Until-Bedingung vor dem ersten Durchlauf ausgewertet - die Bedingung ist bereits vorher! erfüllt und die Do ... Loop Schleife wird gar nicht durchlaufen. Oldman hat das erkannt und die Variable vorher mit 5 belegt, so dass die Bedingung vorher falsch ist und die Schleife durchlaufen werden muss. In beiden Fällen handelt es sich um kopfgesteuerte Schleifen, die nur durchlaufen werden, wenn die Bedingung am Kopf vorher! einen Durchlauf bewirkt. Meine Schleife ist jedoch eine fußgesteuerte Schleife die Bedingung wird erst nach dem ersten Durchlauf ausgewertet. Durch i = Int((8 * Rnd) + 1) wird ein Wert zwischen 1 und 8 während des Durchlaufes zugewiesen, so dass der Wert am Ende immer verschieden von 0 ist.

Zufallszahlen von 1-8 (ohne 5)	732	Tagedieb	11.03.06 22:03
Re: Zufallszahlen von 1-8 (ohne 5)	574	OldMan	11.03.06 22:30
Re: Zufallszahlen von 1-8 (ohne 5)	558	Tagedieb	11.03.06 23:14
Re: Zufallszahlen von 1-8 (ohne 5)	542	OldMan	11.03.06 23:26
Re: Zufallszahlen von 1-8 (ohne 5)	570	me36835	12.03.06 00:15
Re: Zufallszahlen von 1-8 (ohne 5)	569	OldMan	12.03.06 01:11
Re: Zufallszahlen von 1-8 (ohne 5)	564	Tagedieb	12.03.06 10:50
Re: Zufallszahlen von 1-8 (ohne 5)	552	me36835	12.03.06 20:15
Re: Zufallszahlen von 1-8 (ohne 5)	534	Tagedieb	12.03.06 20:50
Re: Zufallszahlen von 1-8 (ohne 5)	580	OldMan	12.03.06 21:57
Re: Zufallszahlen von 1-8 (ohne 5)	573	me36835	13.03.06 11:18

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen