以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  菜单栏显示日期和星期怎么实现  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=79294)

--  作者:sf020cf
--  发布时间:2015/12/28 16:28:00
--  菜单栏显示日期和星期怎么实现

如图
图片点击可在新窗口打开查看此主题相关图片如下:2015-12-28_162900.jpg
图片点击可在新窗口打开查看

这个怎么实现


--  作者:大红袍
--  发布时间:2015/12/28 16:30:00
--  

Dim str As String = format(Date.today, "今天是:yyyy/MM/dd dddd")

msgbox(str)


--  作者:sf020cf
--  发布时间:2015/12/28 17:26:00
--  
写在哪才能如图中一样在菜单显示?
--  作者:大红袍
--  发布时间:2015/12/28 18:31:00
--  

加入一个菜单,然后写代码

 

RibbonTabs("Common").Groups("ClipBoard").Items("Paste").Text = format(Date.today, "今天是:yyyy/MM/dd dddd")