gemas
wzl-lid
Sinds 16/3/2004
T: 11
R: 9
|
12/4/2006 -
15:11u
| Quote
|
Private Function random() As Integer
Dim nr As New Random
Dim terug As Integer = nr.Next(1, 100)
Return terug
End Function
wanneer ik deze functie aanroep krijg ik iedere keer hetzelfde getal terug.
weet iemand een oplossing?
|
Tjoolder
wzl-lid
Sinds 5/4/2004
T:3 -
R:96
|
12/4/2006 -
15:19u
| Quote
|
Private Function random() As Integer
Dim nr As New Random
Dim terug As Integer = nr.Next(1, 100)
Return terug
End Function
wanneer ik deze functie aanroep krijg ik iedere keer hetzelfde getal terug.
weet iemand een oplossing?
Private Function random() As Integer
Dim nr As New Random
Return nr.Next(1, 100)
End Function
Ziet er toch goed uit volgens mij ...
|
gemas
wzl-lid
Sinds 16/3/2004
T:11 -
R:9
|
12/4/2006 -
15:38u
| Quote
|
Dim nr As New Random
Private Function random() As Integer
Dim terug As Integer = nr.Next(1, 100)
Return terug
End Function
random erbuiten declareren en dan bolt et, zo simpel 
|
Keneo
wzl-lid
Sinds 19/10/2004
T:7 -
R:409
|
12/4/2006 -
17:58u
| Quote
|
de randomize() functie ne keer aanroepen zorgt er ook voor dat het seed van het eerste randomgetal niet altijd hetzelfde is
nu gaat ge nog altijd dezelfde rij getallen krijgen iedere keer als ge uw 'programma' gaat opnieuw opstarten...
mja, random is dus nie random hé op de pc 
|
