title: How to get random numbers with percent to show
body: <p><strong>Hi i'm creating a program in vb that can generate random numbers. the thing is i want to lessen the chance to appear the highest number.</strong></p>
  
  <p>for Example i have numbers from 1-10 (in ramdom)</p>
  
  <p>Number 10 the chance to appear is 10%</p>
  
  <p>Number 9 the chance to appear is 20%</p>
  
  <p>Number 8 the chance to appear is 30%
  etc..</p>
  
  <p><strong>here is my sample code.</strong></p>
  
  <pre><code>        Dim R1 As New Random
          Dim d1result1 As Integer = R1.Next(1, 10)
          Label2.Text = d1result1.ToString
  </code></pre>