Re: [VB.NET]Random functie

Article View: be.comp.programming

Article #713

Back to be.comp.programming Previous Next

#713

From: Peter
Date: Thu, 11 May 2006 17:44

33 lines
2228 bytes

bernd wrote:
> hallo,
> 
> ik ben student informatica en heb een probleempje met de random functie in 
> VB.net. telkens als ik een programma run waar 3 random waardes worden 
> bepaald, leveren alle 3 die functies dezelfde waarde... hoe kan ik dit 
> oplossen?
> 
> code:
> Private Sub ButtonSpin_Click(ByVal sender As System.Object, ByVal e As 
> System.EventArgs) Handles ButtonSpin.Click
> Dim waarde1 As Random = New Random
> Label1.Text = CStr(waarde1.Next(1, 100))
> Dim waarde2 As Random = New Random
> Label2.Text = CStr(waarde2.Next(1, 100))
> Dim waarde3 As Random = New Random
> Label3.Text = CStr(waarde3.Next(1, 100))
> End Sub
> 
> bedankt 
> 
> 

Je 3 instanties vertrekken vanuit dezelfde seed. Starten met een andere 
seed kan met Randomize().

Trouwens,
Waarom 3 instanties.
Je kan toch 3x de next method aanroepen van 1 instantie?


mvg,
Peter

Technical Details

Message-ID: <dKK8g.419444$9e1.11516978@phobos.telenet-ops.be>

Path:

arc1-ca.pugleaf.net!g2news2.google.com!news4.google.com!news3.google.com!news2.volia.net!newsfeed01.sul.t-online.de!newsfeed00.sul.t-online.de!t-online.de!83.128.0.11.MISMATCH!news-out1.kabelfoon.nl!newsfeed.kabelfoon.nl!bandi.nntp.kabelfoon.nl!195.130.132.66.MISMATCH!hoboe2bl2.telenet-ops.be!nntp.telenet.be!kwabbernoot.telenet-ops.be!phobos.telenet-ops.be.POSTED!not-for-mail

References: <4460e75e$0$27124$ba620e4c@news.skynet.be>

Show Full Headers

Complete Article Headers

X-Google-Thread: fcea4,e090aecbe70a9aec
X-Google-Thread: 107324,e090aecbe70a9aec
X-Google-Attributes: gidfcea4,gid107324,public
X-Google-Language: DUTCH,ASCII-7-bit
Path: arc1-ca.pugleaf.net!g2news2.google.com!news4.google.com!news3.google.com!news2.volia.net!newsfeed01.sul.t-online.de!newsfeed00.sul.t-online.de!t-online.de!83.128.0.11.MISMATCH!news-out1.kabelfoon.nl!newsfeed.kabelfoon.nl!bandi.nntp.kabelfoon.nl!195.130.132.66.MISMATCH!hoboe2bl2.telenet-ops.be!nntp.telenet.be!kwabbernoot.telenet-ops.be!phobos.telenet-ops.be.POSTED!not-for-mail
From: Peter <spetrelly@pandora.be>
User-Agent: Mozilla Thunderbird 0.8 (Windows/20040913)
X-Accept-Language: en-us, en
MIME-Version: 1.0
Newsgroups: be.comp.programming,nl.comp.programmeren
Subject: Re: [VB.NET]Random functie
References: <4460e75e$0$27124$ba620e4c@news.skynet.be>
In-Reply-To: <4460e75e$0$27124$ba620e4c@news.skynet.be>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
Lines: 33
Message-ID: <dKK8g.419444$9e1.11516978@phobos.telenet-ops.be>
Date: Thu, 11 May 2006 17:44:41 GMT
NNTP-Posting-Host: 81.165.235.226
X-Complaints-To: abuse@telenet.be
X-Trace: phobos.telenet-ops.be 1147369481 81.165.235.226 (Thu, 11 May 2006 19:44:41 MEST)
NNTP-Posting-Date: Thu, 11 May 2006 19:44:41 MEST
Organization: Telenet Internet

Reply to Parent Message