Section courante

A propos

Section administrative du site

RND

Arrondie
Visual Basic

Syntaxe

Function Rnd As Integer

Description

Cette fonction retourne un nombre aléatoire.

Remarques

Exemple

Voici un exemple permet d'afficher des nombres aléatoires :

  1. Sub Main()
  2.  Dim S As String
  3.  S = ""
  4.  S = S & "Aleatoire reel (0 a 1) = " & RND() & vbCrLf
  5.  S = S & "Aleatoire reel (0 a 9) = " & (RND() * 10) & vbCrLf
  6.  FOR I = 0 TO 19
  7.   S = S & "Aleatoire entier (1 a 100) = " & INT((RND() * 100) + 1) & vbCrLf
  8.  NEXT 
  9.  MsgBox S
  10. End Sub

on obtiendra le résultat semblable suivant :

Aleatoire reel (0 a 1) = 0,7055475
Aleatoire reel (0 a 9) = 5,33424
Aleatoire entier (1 a 100) = 58
Aleatoire entier (1 a 100) = 29
Aleatoire entier (1 a 100) = 31
Aleatoire entier (1 a 100) = 78
Aleatoire entier (1 a 100) = 2
Aleatoire entier (1 a 100) = 77
Aleatoire entier (1 a 100) = 82
Aleatoire entier (1 a 100) = 71
Aleatoire entier (1 a 100) = 5
Aleatoire entier (1 a 100) = 42
Aleatoire entier (1 a 100) = 87
Aleatoire entier (1 a 100) = 80
Aleatoire entier (1 a 100) = 38
Aleatoire entier (1 a 100) = 97
Aleatoire entier (1 a 100) = 88
Aleatoire entier (1 a 100) = 6
Aleatoire entier (1 a 100) = 95
Aleatoire entier (1 a 100) = 37
Aleatoire entier (1 a 100) = 53
Aleatoire entier (1 a 100) = 77


Dernière mise à jour : Lundi, le 19 novembre 2012