Find Code:
All Words
Any of the Words
Exact Phrase
Home
:
Code
:
Forums
:
Submit
:
Mailing List
:
About
:
Contact
Code
All
VB.NET
ASP.NET
C#
VB Classic
ASP Classic
Snippets
Popular
Resources
Submit Code
Forums
Articles
Tips
Links
Books
Contest
Link to us
Just another function that will give you a random ...
Author:
Matt Smith
E-mail:
Click to e-mail author
Submitted:
8/21/2000
Version:
VB4
Compatibility:
VB4, VB5, VB6
Category:
Miscellaneous
Views:
7390
Just another function that will give you a random number, in between two given values.
Declarations:
'none
Code:
' S = smallest number that it could return ' L = largest number that it could return Private Function Random(S, L) Randomize 5 RndNum = Int(Rnd * (L - S + 1)) + S DoEvents If RndNum < S Or RndNum > L Then GoTo 5 Random = RndNum End Function
Home
|
Forums
|
Submit
|
Books
|
Mailing List
|
Advertising
|
About
|
Contact
© 2024 A1VBCode. All rights reserved.
Legal disclaimer & terms of use
Privacy statement