• Home
 · 
• Miscellaneous
 · 
• A REAL RANDOM NUMBER GENERATOR

A REAL RANDOM NUMBER GENERATOR

This code will create completely random numbers for you!

Inputs
The user MUST hace a Label named Label1 and a Button named Command1!!!

Returns
This program, after pressing the button, creates a random number in the label.

Rate A REAL RANDOM NUMBER GENERATOR

• 1
• 2
• 3
• 4
• 5

(12(12 Vote))

Sub Command1_Click ()
Randomize 'makes it random
  'makes a random number, 1 - 100 in Label1
  Value = Int(100 * Rnd)
  Label1.Caption = Str$(Value)
End Sub