Probléme Vb.net nombre aléatoire.
Stickmann21
-
Stickmann21 -
Stickmann21 -
Bonjour, j'ai créer un Yam qui génère pour le dés 2 et le dés 5 toujours ou presque le méme nombre : Voila le code qui crée les nombres aléatoire :
Et voila la fonction affichant l'image pour chaque dés
Merci d'avance =)
If cado1 = True Then
Randomize()
desR1 = Int(6 * Rnd() + 1)
End If
If cado2 = True Then
Randomize()
desR2 = Int(6 * Rnd() + 1)
End If
If cado3 = True Then
Randomize()
desR3 = Int(6 * Rnd() + 1)
End If
If cado4 = True Then
Randomize()
desR4 = Int(6 * Rnd() + 1)
End If
If cado5 = True Then
Randomize()
desR5 = Int(6 * Rnd() + 1)
End If
Numero(dés1.Image, desR1, cado1)
Numero(dés2.Image, desR2, cado2)
Numero(dés3.Image, desR3, cado3)
Numero(dés4.Image, desR4, cado4)
Numero(dés5.Image, desR5, cado5)
Et voila la fonction affichant l'image pour chaque dés
If 1 = y Then
x = Image.FromFile("Dés_1.bmp")
ElseIf 2 = y Then
x = Image.FromFile("Dés_2.bmp")
ElseIf 3 = y Then
x = Image.FromFile("Dés_3.bmp")
ElseIf 4 = y Then
x = Image.FromFile("Dés_4.bmp")
ElseIf 5 = y Then
x = Image.FromFile("Dés_5.bmp")
ElseIf 6 = y Then
x = Image.FromFile("Dés_6.bmp")
End If
Merci d'avance =)
A voir également:
- Probléme Vb.net nombre aléatoire.
- Nombre de jours entre deux dates excel - Guide
- Nombre facile - Télécharger - Outils professionnels
- Ascii nombre de caractères - Guide
- Faites afficher avec un fond coloré les cellules qui contiennent une valeur comprise entre 250 et 350. quel nombre est dessiné en surbrillance ? ✓ - Forum Excel
- Afficher le 0 devant un nombre dans excel - Guide
