Système aléatoire VB.net

Résolu/Fermé

Utilisateur anonyme - 17 juin 2016 à 09:04
Utilisateur anonyme - 30 juin 2016 à 17:00

Bonjour,

J'aimerais bien savoir comment faire un bout de code pour créer un système de sélection aléatoire; j'ai essayer ce code mais il ne fonctionne pas :

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Label1.Text = Int(Rnd() * 4)
        Select Case Label1.Text
            Case 0
                Label1.Text= "1"
            Case 1
                Label1.Text= "2"
            Case 1
                Label1.Text= "3"
            Case 2
                Label1.Text= "4"
	    Case 2
                Label1.Text= "5"
        End Select
    End Sub

Si vous avez quelques choses à proposer, je suis preneur ;)

Merci
Cordialement VANAUR

A voir également:

Système aléatoire VB.net
Restauration systeme windows 10 - Guide
Comment refaire le système d'un ordinateur - Guide
Cloner disque systeme - Guide
La zone de données passée à un appel système est insuffisante - Windows 11
Tirage au sort excel aléatoire sans doublon ✓ - Forum Excel

1 réponse

Réponse 1 / 1

perreet Messages postés 230 Date d'inscription vendredi 30 janvier 2009 Statut Membre Dernière intervention 3 mai 2018 20
30 juin 2016 à 13:50

Salut,

Rnd() renvoie un nombre aléatoire entre 0 et 1.

Si tu veux générer 0,1,2,3, ou 4 : Label1.Text = Int(Rnd() * 5)

Si tu veux générer 1,2,3,4, ou 5 : Label1.Text = Int(Rnd() * 4 + 1)

perreet Messages postés 230 Date d'inscription vendredi 30 janvier 2009 Statut Membre Dernière intervention 3 mai 2018 20
30 juin 2016 à 13:52

J'avais pas vu ça :
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

Utilisateur anonyme
30 juin 2016 à 17:00

Merci pour ces conseils, je vais m'informer un peu plus sur cette nouvelle structure

Discussions similaires

tirage aléatoire sans doublon

peripherique systeme de base windows 10

Système d'exploitation 32 bits, processeur x64

erreur système(zoom) sur appareil photo numerique panasonic

l'administrateur système a configuré la polit

Discussions similaires

Newsletters