Renvoie une donnée de type Single contenant un nombre aléatoire.
Syntaxe
Rnd[(nombre)]
L’argument numériquefacultatif est une expression numérique Single ou toute expression numérique valide.
Valeurs de retour
| Si le nombre est | Rnd génère |
|---|---|
| Inférieur à zéro | Le même nombre à chaque fois, en utilisant le nombre comme graine. |
| Supérieur à zéro | Nombre aléatoire suivant dans la séquence. |
| Égal à zéro | Numéro généré le plus récemment. |
| Non fourni | Nombre aléatoire suivant dans la séquence. |
Remarques
La fonction Rnd renvoie une valeur inférieure à 1 mais supérieure ou égale à zéro.
La valeur du nombre détermine comment Rnd génère un nombre aléatoire :
Pour une valeur initiale donnée, la même séquence de nombres est générée car chaque appel successif à la fonction Rnd utilise le nombre précédent comme valeur initiale pour le nombre suivant dans la séquence.
Avant d’appeler Rnd, utilisez l’instruction Randomize sans argument pour initialiser le générateur de nombres aléatoires avec une valeur initiale basée sur le temporisateur système.
Pour produire des entiers aléatoires dans une plage donnée, utilisez cette formule :
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Ici, la limite supérieure est le nombre le plus élevé de la plage et la limite inférieure est le nombre le plus bas de la plage.
Remarque
Pour répéter des séquences de nombres aléatoires, appelez Rnd avec un argument négatif immédiatement avant d’utiliser Randomiser avec un argument numérique. L’utilisation de Randomiser avec la même valeur pour le nombre ne répète pas la séquence précédente.
Exemple de requête
| Expression | Résultats |
|---|---|
| SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales ; | Renvoie l’ID de produit ainsi que des nombres aléatoires dans la colonne NombresAléatoires. |
Exemple de VBA
Remarque
Les exemples suivants illustrent l’utilisation de cette fonction dans un module Visual Basic pour Applications (VBA). Pour plus d’informations sur l’utilisation de VBA, sélectionnez Référence développeur dans la liste déroulante en regard de Rechercher , puis entrez un ou plusieurs termes dans la zone de recherche.
Cet exemple utilise la fonction Rnd pour générer une valeur entière aléatoire comprise entre 1 et 6.
Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)