Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Zufallszahlen von 1-8 (ohne 5)
Autor: Tagedieb
Datum: 12.03.06 10:50
Hallo me36835, danke für den Tipp. Ursprünglich hatte ich es ähnlich wie Du gemacht: Dim i As Integer Randomize Do Until i <> 5 i = Int((8 * Rnd) + 1) Loop da das immer nur 0 lieferte habe ich Randomize in die Schleife gelegt: Dim i As Integer Do Until i <> 3 Randomize i = Int((8 * Rnd) + 1) Loop ging aber auch nicht, lieferte auch nur 0. Deshalb bin ich dann auf die Idee mit dem GoTo gekommen. Wieso es allerdings bei Dir klappt und bei mir nicht, ist mir ein Rätsel. Ist doch beides eine Do...Loop Schleife. Gruß Thomas

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)	565	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)	574	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