Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Zufallszahlgenerator
Autor: Vilut
Datum: 17.01.02 11:48
Also ich hab jetzt meine Zufallszahlen ermittelt, Dim Fragennummern(10) As Integer 'Sicherstellen, daß bei jedem Start wirklich 'eine neue Zufallszahl generiert wird Randomize -Timer 'Insgesamt 10 Zufallszahlen ermitteln Dim Ziehung As Integer Dim i As Integer Dim Result As Boolean Dim Zahl As Integer Ziehung = 0 While Ziehung < 10 Ziehung = Ziehung + 1 Do 'Zufallszahl 1..10 Zahl = Int(10 * Rnd + 1) 'Prüfen, ob Zufallszahl bereits "gezogen" Result = True For i = 1 To Ziehung - 1 If Fragennummern(i) = Zahl Then Result = False: Exit For End If Next i Loop Until Result = True Fragennummern(Ziehung) = Zahl Wend doch wie kann ich über diese z.B. 10 verschiedene Texte nacheinander in einer textbox anzeigen lassen?

Zufallszahlgenerator	68	Vilut	16.01.02 22:13
Re: Zufallszahlgenerator	306	unbekannt	16.01.02 22:27
Re: Zufallszahlgenerator	38	Vilut	16.01.02 23:06
Re: Zufallszahlgenerator	406	unbekannt	16.01.02 23:14
Re: Zufallszahlgenerator	34	Vilut	17.01.02 00:02
Re: Zufallszahlgenerator	36	Vilut	17.01.02 11:28
Re: Zufallszahlgenerator	45	Vilut	17.01.02 11:48
Re: Zufallszahlgenerator	318	Dieter	17.01.02 12:51
Array	42	Vilut	17.01.02 13:33
Re: Array	340	Dieter	17.01.02 13:38
Allgemein	51	Vilut	17.01.02 14:14
Click	36	Vilut	17.01.02 16:41

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