by Free Man (1 Submission)
Category: Miscellaneous
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sat 6th April 2002
Date Added: Mon 8th February 2021
Rating: (1 Votes)
spin numbers
Timer1.Enabled = True
End Sub
Private Sub Form_Load()
Randomize
End Sub
Private Sub Timer1_Timer()
Label1.Caption = Int(Rnd * 10)
Label2.Caption = Int(Rnd * 10)
Label3.Caption = Int(Rnd * 10)
c = c + 1
If c = 100 Then
Timer1.Enabled = False
c = 0
End If
End Sub