关于time()用法

bbpst

想在窗体中加入时间函数,而且要求时间与电脑时间同步实时变化,但就是不行
请版主Henry D. Sy  帮帮忙

Henry D. Sy

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

Format$(DATE, "yyyy年mm月dd日 ") & WeekdayName(Weekday(DATE)) & Format$(Time, " hh:nn:ss")

Henry D. Sy

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

多谢版主,原来用了TimerInterval属性,我原本没用,载入窗体时,显示的是载入时的时间(固定不变的)