请教：扬州华泰ERP信息管理系统.table 状态栏上时间刷新的实现方式，看了代码没找到计划任务，不知道按秒刷新时间是用什么方式实现的？
疑惑中，谢谢各位。
相关代码：
状态栏button时间
Dim StatusBar As C1.Win.C1Ribbon.C1StatusBar = BaseMainform.Controls("C1StatusBar1")
If Not StatusBar.leftPaneItems.Contains("BtnTest") Then
RbnBtn = New C1.Win.C1Ribbon.RibbonButton
'RbnBtn.Name = "BtnTest"
RbnBtn.TextImageRelation = C1.Win.C1Ribbon.TextImageRelation.ImageBeforeText
RbnBtn.SmallImage = GetImage("clock.png")
RbnBtn.Text = Date.now & " " & Format(Date.Today(),"dddd")
'RbnBtn.ToolTip = "状态栏上添加的按钮"
StatusBar.rightPaneItems.Add(RbnBtn)
End If
Dim t1 As Date = Vars("Time")
Dim t2 As Date = Functions.Execute("服务器精确时间")
Dim t As TimeSpan = t2 - t1
Dim str As String
str = t.Minutes & ":" & t.Seconds & ":" & Format(t.Milliseconds,"000")
e.Form.Controls("Button1").text = str
加好友 
发短信
Post By：2013/1/6 11:42:00 [显示全部帖子]
