vb.net跑表程序

PublicClassForm1 Dimmsec,sec,min,hourAsInteger PrivateSubTimer1_Tick(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesTimer1.Tick msec+=1 Ifmsec>=100Then msec=0 sec+=1 ElseIfsec>=60Then sec