Code:
Private Sub Command1_Click()
    Randomize Timer
    Label1 = Int(Rnd * 999) + 1
End Sub
------------------
Aaron Young
Analyst Programmer
[email protected]
[email protected]