Et ramdom integer, fx. under 500

glemte lige at skrive, jeg jeg også gerne vil kunne fjerne tal fx. under 100

Dim rng As Random = New Random
Dim n As Integer = rng.Next(100, 500)

Den returnerer et tal 100..499

Du kan selv justere for om 500 skal med

arh okay. MAnge tak for den hurtige hjælp. Har lige et andet spørgsmål også, skal nok lige afsætte lidt flere point.

Se følgende kode

            For i = 1 To antal
                Dim random As New Random

                MsgBox(random.Next)
                ListBox1.Items.Add(random.Next)


            Next

Dette virker helt fint. Men hvis jeg fjerner "MsgBox(random.Next)" bliver alle talene ens i listboxen.

Dim random As New Random

For i = 1 To antal

                MsgBox(random.Next)
                ListBox1.Items.Add(random.Next)


            Next

Det er meget vigtigt at du kun initialiserer random generatoren en gang

okay :D Mange tak skal du have. Smid et svar, så giver jeg dig mine point.

(den bliver initialiseret med med tiden, så i et loop uden vent bliver de
ens alle sammen)

svar