[VB] 랜덤숫자을 출력해보자

Private Sub Form_Load()

Timer1.Enabled = True

Timer1.Interval = 1

End Sub

Private Sub Timer1_Timer()

Dim Notice As String

Notice = Int(Rnd * 100000) + 1

Form1.Caption = Notice

End Sub