Interval=1000就是1秒
1毫秒呢？是几？100不是，10也不是.1更不是。早不到合适的数值。

Text1是分，Text2是秒，Text3是毫秒
设置Interval=？才可以Text2与时间的分对等。

Private Sub Text2_Change()
If Val(Text2.Text) = 60 Then
Text1.Text = Val(Text1.Text) + 1
Text2.Text = "0"
End If
End Sub

Private Sub Timer1_Timer()
If Val(Text3.Text) = 60 Then
Text2.Text = Val(Text2.Text) + 1
Text3.Text = "0"
End If
Text3.Text = Val(Text3.Text) + 1
End Sub