怎样在vfp表单上做一个的时钟

在表单上添加一个timer控件，将其Interval属性值设为1000。
在timer控件的Timer过程中添加以下代码：
thisform.Text1.value=time()

这面的代码就可以让Text控件显示系统时间，每秒钟更新一次。
如果数字没变化，请添加刷新语句
=thisform.text1.refresh()

说明：上例中假设Text控件的名称为Text1，请根据具体情况核实。