在菜单中添加一个功能区,名称为"功能区1",项目事件AfterOpenProject中写如下 代码:
RibbonTabs("功能区1").Text = format(Date.Now, "yyyy-MM-dd dddd")
上面代码放在计划管理中,新建一计划管理,时间间隔1000,实现效果如下,时间会动的呦!
RibbonTabs("功能区1").Text = "今天是: " & format(Date.Now, "yyyy-MM-dd HH:mm:ss dddd")