How do you generate random numbers?

Ive got one button and one textbox. Whats the code so when you click the button a random number appears in the textbox?

I think this is what your looking for :)


Private Sub Command1_Click()
Dim UpperLimit As Integer
Dim LowerLimit As Integer
UpperLimit = 100
LowerLimit = 1
Text1.Text = Rnd * (UpperLimit - LowerLimit) + LowerLimit
End Sub

Don't forget to add "Randomize" at the beginning of your code, or else the same seed will be used to generate the random numbers, giving you the same set of results every time you run the program.

Don't forget to add "Randomize" at the beginning of your code, or else the same seed will be used to generate the random numbers, giving you the same set of results every time you run the program.

whoops, forgot about that :eek:

add this to your Form_Load()


Randomize