以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 日期显示 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=68586) |
-- 作者:lkcao -- 发布时间:2015/5/20 21:02:00 -- 日期显示 帮助中的这个日期是怎么实现的?是给功能组里添加了一个.....? |
-- 作者:大红袍 -- 发布时间:2015/5/20 21:06:00 -- 添加一个菜单控件,然后在 SystemIdle 事件写代码
获取当前时间,这样写 msgbox(format(Date.Now, "yyyy年MM月dd日 HH:mm:ss dddd")) |
-- 作者:lkcao -- 发布时间:2015/5/20 21:14:00 -- 菜单控件?,没找到怎么添加 |
-- 作者:大红袍 -- 发布时间:2015/5/20 21:26:00 -- http://www.foxtable.com/help/topics/1064.htm
http://www.foxtable.com/help/topics/1526.htm
|
-- 作者:lkcao -- 发布时间:2015/5/20 21:42:00 -- 也许我没理解透,是这样的,设计菜单我知道,怎么设定显示的位置,如果不设定,是显示在一个弹出框中,而且还关闭不了 |
-- 作者:大红袍 -- 发布时间:2015/5/20 21:46:00 -- 加入一个菜单后,设置菜单内容 RibbonTabs("Table").Groups("Column").Items("Reset").Text = format(Date.Now, "yyyy年MM月dd日 HH:mm:ss dddd") |
-- 作者:黄训良 -- 发布时间:2015/5/21 1:52:00 -- 在菜单中添加一个功能区,名称为"功能区1",项目事件AfterOpenProject中写如下 代码: RibbonTabs("功能区1").Text = format(Date.Now, "yyyy-MM-dd dddd") [此贴子已经被作者于2015/5/21 2:18:31编辑过]
|
-- 作者:黄训良 -- 发布时间:2015/5/21 2:23:00 -- 上面代码放在计划管理中,新建一计划管理,时间间隔1000,实现效果如下,时间会动的呦! RibbonTabs("功能区1").Text = "今天是: " & format(Date.Now, "yyyy-MM-dd HH:mm:ss dddd") 此主题相关图片如下:菜单设计01.png [此贴子已经被作者于2015/5/21 2:30:43编辑过]
|