Results 1 to 5 of 5

Thread: Random

  1. Jun 24th, 2004, 09:51 AM #1
    machinist
    machinist is offline

    Thread Starter
    Member
    Join Date
    May 2004
    Location
    Where i am
    Posts
    38

    Random

    Im trying to do something but it requires the use of random numbers and i can make random numbers but i want them in a certain range eg 1-10
    Reply With Quote Reply With Quote
  2. Jun 24th, 2004, 10:25 AM #2
    si_the_geek
    si_the_geek is offline
    Super Moderator si_the_geek's Avatar
    Join Date
    Jul 2002
    Location
    Bristol, UK
    Posts
    41,974
    my_number = (rnd() * (max_val - min_val + 1)) + min_val

    in this particular case:
    my_number = (Rnd() * (10 - 1)) + 1
    (Microsoft MVP from July 2007 to June 2017) . . . . . . . . . . Hitchhiker's Guide to Getting Help at VBForums

    Database Development FAQs/Tutorials (updated May 2011) (includes fixing common DB related errors, and [VB.Net] ADO.Net Tutorial, and [Classic VB] ADO tutorial /further steps)
    other useful DB bits: . Connection strings (alternative copy).•. MDAC/Jet/ACE downloads .•. SQL Server downloads .

    Classic VB FAQs (updated Oct 2010) (includes fixing common VB errors)
    some of my Classic VB bits: . Tutorial: How to automate Excel from VB6 (or VB5/VBA) .•. SQL 'Select' statement formatter/checker .•. Convert colour number to colour name .•. FlexGrid: fill from recordset .•. FlexGrid: AutoSize columns .•. DB Reserved Words checker .
    Reply With Quote Reply With Quote
  3. Jun 25th, 2004, 02:37 AM #3
    BrianB
    BrianB is offline
    Addicted Member
    Join Date
    Aug 2002
    Location
    Luton, UK
    Posts
    178
    ERROR!!
    my_number = (Rnd() * (10 - 1)) + 1
    This only gives random numbers 1 to 9.

    The correct formula is :-
    Code:
    MyNumber = Int(Rnd() * 10) + 1
    Regards
    BrianB
    -------------------------------
    Reply With Quote Reply With Quote
  4. Jun 25th, 2004, 03:44 AM #4
    si_the_geek
    si_the_geek is offline
    Super Moderator si_the_geek's Avatar
    Join Date
    Jul 2002
    Location
    Bristol, UK
    Posts
    41,974
    oops.. I forgot to carry across the +1!

    it should have been :
    my_number = (Rnd() * (10 - 1 + 1)) + 1

    (which is the same as you said!)
    (Microsoft MVP from July 2007 to June 2017) . . . . . . . . . . Hitchhiker's Guide to Getting Help at VBForums

    Database Development FAQs/Tutorials (updated May 2011) (includes fixing common DB related errors, and [VB.Net] ADO.Net Tutorial, and [Classic VB] ADO tutorial /further steps)
    other useful DB bits: . Connection strings (alternative copy).•. MDAC/Jet/ACE downloads .•. SQL Server downloads .

    Classic VB FAQs (updated Oct 2010) (includes fixing common VB errors)
    some of my Classic VB bits: . Tutorial: How to automate Excel from VB6 (or VB5/VBA) .•. SQL 'Select' statement formatter/checker .•. Convert colour number to colour name .•. FlexGrid: fill from recordset .•. FlexGrid: AutoSize columns .•. DB Reserved Words checker .
    Reply With Quote Reply With Quote
  6. Jun 25th, 2004, 04:45 AM #5
    machinist
    machinist is offline

    Thread Starter
    Member
    Join Date
    May 2004
    Location
    Where i am
    Posts
    38

    Thanx

    Thanx very much
    Reply With Quote Reply With Quote
« Previous Thread | Next Thread »

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Forum Rules


Click Here to Expand Forum to Full Width