我是加在配置栏的,你可以在配置栏放一个标签,然后将下面的代码放入菜单的SystemIdle事件:
Static i As Integer
If Date.now.Second <> i Then
i = Date.Now.SecondConfigBar.Items("标签1").Text = Date.Now
End If