Solved

Most efficient way to code 20 random numbers with different max values?

Posted on 2009-05-10
3
182 Views
Last Modified: 2012-05-06
I need to get 20 random whole numbers, all with a bottom limit of 1 and a max limit that is unique for all 20.

Once i get all 20 random numbers, I need to store them in a simple array:   mynumber(X)

Here are all 20 max limits:

10,13,18,23,30
17,62,8,27,38
102,78,66,98,73
33,70,80,111,85

What is the most efficient way to code my task, using the least amount of code and processing power?  I know how to code this, but I already know my code will be heavy-handed, and I have the feeling some wizard out there would know how to do this clean and efficient

The application is a visual ASP.NET application so code should be VB compatible for ASP.NET and will be executed on a web server.

Thank you!
0
Comment
Question by:arthurh88
3 Comments
 
LVL 15

Expert Comment

by:OMC2000
ID: 24349648
    ' make array of values
      Dim myArray(20) As New Integer;
      ' Initialize random number generator.
      Dim rnd As New Random()

' fill it with the value from own interval for each one
         myArray(0) = rnd.Next(1, 10)
         myArray(1) = rnd.Next(1, 13)
         myArray(2) = rnd.Next(1, 18)
         myArray(3) = rnd.Next(1, 23)
...
         myArray(18) = rnd.Next(1, 111)
          myArray(19) = rnd.Next(1, 85)
0
 
LVL 85

Accepted Solution

by:
Mike Tomlinson earned 500 total points
ID: 24350373
How about:

        Dim R As New Random
        Dim maxLimits() As Integer = {10, 13, 18, 23, 30, 17, 62, 8, 27, 38, 102, 78, 66, 98, 73, 33, 70, 80, 111, 85}
        Dim myNumbers(maxLimits.Length - 1) As Integer
        For i As Integer = 0 To maxLimits.Length - 1
            myNumbers(i) = R.Next(1, maxLimits(i) + 1)
        Next

0
 

Author Comment

by:arthurh88
ID: 24351004
excellent!
0

Featured Post

Does Powershell have you tied up in knots?

Managing Active Directory does not always have to be complicated.  If you are spending more time trying instead of doing, then it's time to look at something else. For nearly 20 years, AD admins around the world have used one tool for day-to-day AD management: Hyena. Discover why

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In an ASP.NET application, I faced some technical problems. In this article, I list them out and show the solutions that I found.  I hope it will be useful. Problem: After closing a pop-up window, the parent page should be refreshed automaticall…
The ECB site provides FX rates for major currencies since its inception in 1999 in the form of an XML feed. The files have the following format (reducted for brevity) (CODE) There are three files available HERE (http://www.ecb.europa.eu/stats/exch…
This Micro Tutorial hows how you can integrate  Mac OSX to a Windows Active Directory Domain. Apple has made it easy to allow users to bind their macs to a windows domain with relative ease. The following video show how to bind OSX Mavericks to …
The Email Laundry PDF encryption service allows companies to send confidential encrypted  emails to anybody. The PDF document can also contain attachments that are embedded in the encrypted PDF. The password is randomly generated by The Email Laundr…

803 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question