在Form2窗体中，单击"预测"按钮，按0.1秒随机产生一个20以内的正整数
    该如何编写！！ 求高手指点迷津！ 不胜感激！！！

Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Form_Load()
Dim a As Integer
Command1.Caption = "预测"
Timer1.Interval = 100
Timer1.Enabled = False
End Sub
Private Sub Timer1_Timer()
Me.Caption = Time
a = Int(Rnd * 20) + 1
Label1.Caption = a
End Sub