Vfp表单设计

初始化(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()