Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Random Number
Message
De
26/11/2001 11:26:18
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
00585489
Message ID:
00585771
Vues:
22
>>>Hi all:
>>>
>>>How do I get a random number between 1 and 1000 in VFP6
>>>I could not find it in help.
>>>
>>>Thank you.
>>
>>
? INT(1000 * RAND( ) + 1)
>Instead of using 1000 in the equation above, use 999. The +1 could give you 1001, if RAND() returns 1 which it could.

I was going to suggest that, but I did a small test
do while .T.
 if ( int( 1000 * rand() + 1 ) > 1000 )
   ? "Error"
  endif
enddo
I let it run for 1/2 hour without getting "Error" printed. It is just a possibility that 1001 could be generated, but very unlikely.

could try
? round( 999 * rand() + 1, 0 )
Len Speed
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform