Probleme avec le Random en vb.net

cs_chris81 Messages postés 589 Date d'inscription jeudi 2 octobre 2003 Statut Membre Dernière intervention 29 avril 2008 - 24 mai 2004 à 11:30
cs_chris81 Messages postés 589 Date d'inscription jeudi 2 octobre 2003 Statut Membre Dernière intervention 29 avril 2008 - 24 mai 2004 à 12:18
bonjour,
je voudrais savoir pourquoi le random sous vb.net sort toujours les memes numeros a chaque fois que je lui demande un random

voici mon code

Dim c As New Random
Dim i, a As Integer

a = 0
i = 0

i = c.Next(1000000)
a = Mid(i, 4, 1)
Label1.Text = a
Label2.Text = i

ce code me retournera par exemple
5 puis 4 puis 4 puis 4..... etc
ou alors il me donnera
1 puis 2 puis 1 puis 1 .... etc

est ce que quelqu'un saurait pourquoi?
merci

2 réponses

crenaud76 Messages postés 4172 Date d'inscription mercredi 30 juillet 2003 Statut Membre Dernière intervention 9 juin 2006 28
24 mai 2004 à 12:01
Je supposes que c'est en VB.NET comme en VB6, il faut initialisé le générateur de nombres pseudo-aléatoire. En VB6, c'est l'instruction "Randomize", je penses qu'ne .NET ce doit pas etre bien loin de cela

Christophe R.
0
cs_chris81 Messages postés 589 Date d'inscription jeudi 2 octobre 2003 Statut Membre Dernière intervention 29 avril 2008 2
24 mai 2004 à 12:18
ici elle est initialise
l'initialisation de vb6
NbreNul = CInt(Int((9 * Rnd()) + 1))

revient a faire en vb.net
i = c.Next(1,9)
0
Rejoignez-nous