Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Label1.Caption = Time
End Sub
注:如果Label1.Caption=Now,则会出现年月日
Private Sub Command1_Click()
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Label1.Caption = Time
End Sub
注:如果Label1.Caption=Now,则会出现年月日