Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Zufallszahlen
Autor: lil-fab
Datum: 11.04.07 21:41
hallo leute. ich habe da folgesdes problem/aufgabe, die ich nicht ganz lösen kann.es wäre cool wenn mir einer helfen könnte! [u]der Programmcode: Sub Lottozahlen() Dim werte(1 To 6) As Integer, i As Integer, s As String Randomize For i = 1 To 6 werte(i) = Round(48 * Rnd, 0) + 1 s = s & " " & werte(i) Next i MsgBox "Lottozahlen:" & vbCrLf & s End Sub dieses programm gibt teilweise 2 gleiche werte aus, wie kann man es veändern das es nie den gleichen wert 2 mal ausgibt?...(es muss mir einer schleife sein!) ah, und könnt ihr mir sagen was das ganze zeug bei dem Befehl round(48*Rnd,0)+1 bedeutet, und der ausdruck vbCrLf ? danke im vorraus mfg

Zufallszahlen	600	lil-fab	11.04.07 21:41
Re: Zufallszahlen	444	vbtricks	12.04.07 08:28

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