显示即时时间
(1)在窗体中用文本框显示即时时间
在窗体中添加一个文本框,在代码窗口中输入代码:
private sub form_load()
me.text0=now()
end sub

private sub form_timer()
me.timerinterval=1000
form_load
end sub

(2)用标签显示即时时间

在窗体中添加一个标签,在代码窗口中输入代码:
private sub form_load()
me.lab0.caption=now()
end sub

private sub form_timer()
me.timerinterval=1000
form_load
end sub