Office中国论坛/Access中国论坛

标题: 关于time()用法 [打印本页]

---

作者: bbpst    时间: 2011-12-26 12:06
标题: 关于time()用法
想在窗体中加入时间函数,而且要求时间与电脑时间同步实时变化,但就是不行
请版主Henry D. Sy  帮帮忙

---

作者: Henry D. Sy    时间: 2011-12-26 12:32

1. Private Sub Form_Load()
   
2.     Me.TimerInterval = 1000
   
3. End Sub
   
4. 
   
5. Private Sub Form_Timer()
   
6.     Me.Label5.Caption = Now
   
7. End Sub
   

复制代码

---

作者: yanghua1900363    时间: 2011-12-26 12:35
Format$(DATE, "yyyy年mm月dd日 ") & WeekdayName(Weekday(DATE)) & Format$(Time, " hh:nn:ss")

---

作者: Henry D. Sy    时间: 2011-12-26 12:40
2楼的会有一秒的延时、
更改一下

1. Private Sub Form_Load()
   
2.     Me.TimerInterval = 1000
   
3.     Me.Label5.Caption = Now
   
4. End Sub
   
5. 
   
6. Private Sub Form_Timer()
   
7.     Me.Label5.Caption = Now
   
8. End Sub
   

复制代码

---

作者: bbpst    时间: 2011-12-26 13:02
多谢版主,原来用了TimerInterval属性,我原本没用,载入窗体时,显示的是载入时的时间(固定不变的)

---

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)

Powered by Discuz! X3.3