Re: [VB.NET]Random functie

Article View: be.comp.programming

Article #710

Back to be.comp.programming Previous Next

#710

From: wem
Date: Tue, 09 May 2006 19:18

25 lines
2141 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 
> 
> 

Ik ken niet van VB.Net, maar het lijkt erop dat de functie telkens met 
dezelfde seed wordt opgeropen, misschien eens in die richting zoeken?

Technical Details

Message-ID: <tW58g.416049$5A2.11478148@phobos.telenet-ops.be>

Path:

arc1-ca.pugleaf.net!g2news2.google.com!news4.google.com!news.glorb.com!feeder.xsnews.nl!news.astraweb.com!newsrouter-eu.astraweb.com!193.201.147.66.MISMATCH!news-out2.kabelfoon.nl!newsfeed.kabelfoon.nl!xindi.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!news.glorb.com!feeder.xsnews.nl!news.astraweb.com!newsrouter-eu.astraweb.com!193.201.147.66.MISMATCH!news-out2.kabelfoon.nl!newsfeed.kabelfoon.nl!xindi.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: wem <wim.robijn@telenet.be>
User-Agent: Mozilla Thunderbird 1.0.6 (Windows/20050716)
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: 26
Message-ID: <tW58g.416049$5A2.11478148@phobos.telenet-ops.be>
Date: Tue, 09 May 2006 19:18:49 GMT
NNTP-Posting-Host: 84.193.199.13
X-Complaints-To: abuse@telenet.be
X-Trace: phobos.telenet-ops.be 1147202329 84.193.199.13 (Tue, 09 May 2006 21:18:49 MEST)
NNTP-Posting-Date: Tue, 09 May 2006 21:18:49 MEST
Organization: Telenet Internet

Reply to Parent Message