利用其提供的计时器控件来设计一个显示当前日期和时间的表单

Visual FoxPro 6.0是Microsoft公司推出的数据库管理系统，功能强大、使用灵活。在本文中，将利用其提供的计时器控件来设计一个显示当前日期和时间的表单。

　　具体的设计方法：在计时器里有一个Timer事件，其Interval属性(单位为毫秒)指定的时间每经过一次就执行该事件一次。利用这一特点可进行动态的日期、时间显示.



图1


　　1、表单Form1

　　Top=10

　　Left=97

　　Height=239

　　Width=339

　　Caption=“日期时间显示屏"

　　Name=”Form1"

　　2、标签Label1(显示日期)

　　AutoSize=.T.

　　FontName=“楷体-GB2312"

　　FontSize=22

　　Caption=”label1"

　　Height=60

　　Left=72

　　Top=72

　　Width=240

　　Name=“Label1"

　　3、标签Label2(显示时间)

　　AutoSize=.T.

　　FontName=”楷体-GB2312"

　　FontSize=22

　　Caption=“label2"

　　Height=72

　　Left=96

　　Top=156

　　Width=192

　　Name=”Label2"

　　4、计时器Timer1

　　Top=17

　　Left=48

　　Height=23

　　Width=23

　　Interval=500

　　Name=“Timer1"

　　PROCEDURE 　Timer

　　thisform.label1.caption=alltrim(str(year(date())))+”年“+alltrim(str(month(date())))+”月“+alltrim(str(day(date())))+"日"

　　thisform.label2,caption=time()

　　ENDPROC