Random Numbers

[VEM]

heres the code:


private Sub Form_Load()
Label1.Caption = Int(Rnd * 10)
End Sub



Why is it that everytime that you load that load, label1 always = 7 or the same number, I want to randomly generate numbers!!

http://visualblind.tsx.org

[d.paulson]

from msdn
Before calling Rnd, use the Randomize statement without an argument to initialize the random-number generator with a seed based on the system timer.



David Paulson

[VEM]

I've tried that, it still doesn't work

http://visualblind.tsx.org

[d.paulson]

Try this with a small project. Add a label an a command button to the form. Paste this code.

private Sub Command1_Click()
Label1.Caption = Int(Rnd * 10)
End Sub

private Sub Form_Load()
Randomize
End Sub







David Paulson

[VEM]

no, you guys arent getting the picture, i need it on form_load nothing else

http://visualblind.tsx.org

[dhstraayer]

I tried
option Explicit

private Sub Form_Load()
Randomize
Label1.Caption = Int(Rnd() * 10)
End Sub



on a simple form with a single default-named label, and it worked fine. Both from the development environment and compiled into an exe.
Does it work differently on your system?
(For more information about random number generation, see Knuth, Vol III I believe)


Dave Straayer
Varatouch, Inc.

[VEM]

Ok, thank you

http://visualblind.tsx.org