Generer des dates aléatoires

Bonjour
Peut on générer des dates aléatoires comme on le fait pour les nombres?
Si oui comment le ferait on ?

Merci.

Code:

---

1 2 3 4 5 6

Private Shared ReadOnly _random As New Random() Public Shared Function GenerateRandomDate(min As DateTime, max As DateTime) As DateTime Dim timeSpan As TimeSpan = max - min Return min.AddDays(_random.Next(CInt(timeSpan.TotalDays))) End Function

---

Tu aussi faire:

Code:

---

1 2 3 4 5

Dim rnd1 As New Random() Dim value as int rnd1.Next(value)   dim dateRandom as New Date(value);

---

Citation:

---

Envoyé par gcorbineau

Tu aussi faire:

Code:

---

1 2 3 4 5

Dim rnd1 As New Random() Dim value as int rnd1.Next(value)   dim dateRandom as New Date(value);

---

---

Bah non, là tu appelles rnd1.Next(0) et tu récupères pas la valeur, donc ça va donner 0 à chaque fois...

Ce serait plutôt value = rnd1.Next()

oups, tu as tous a fait raison.
Voila ce que c'est de ne pas vérifier le code avec de la poster ;)