初始化(1)Form1的事件代碼:
this form . timer 1 . enabled = . t。
(2)定時器1的定時器事件代碼:
this form . caption = ' Timing:'+time()
如果this form . label 1 . font size = 60
this form . label 1 . font size = 9
其他
this form . label 1 . font size = this form . label 1 . font size+1
endif
二
(1)表單1的初始化事件代碼:
開始壹個世紀
this form . timer 1 . enabled = . t。
(2)定時器控制定時器1的定時器事件代碼:
this form . text 1 . value = all trim(str(year(date()))+' year '+all trim(str(month(date()))+' month '+all trim(str(day(date()))+'
this form . text 1 . value = time()