Foxtable(狐表)用户栏目专家坐堂 → 菜单中的变量


  共有10164人关注过本帖树形打印复制链接

主题:菜单中的变量

美女呀,离线,留言给我吧!
bm
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:437 积分:3463 威望:0 精华:0 注册:2011/9/13 23:27:00
菜单中的变量  发帖心情 Post By:2011/10/25 13:00:00 [只看该作者]

Dim d As Date = Date.Today
RibbonTabs("工作").Groups("工作组").Items("标签2").Text = "星期" & d.DayOfWeek()

这个代码怎样转换才能显示是 星期 二(中文)


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/10/25 13:04:00 [只看该作者]

RibbonTabs("工作").Groups("工作组").Items("标签2").Text =  Format(Date.Today,"dddd")


 回到顶部
美女呀,离线,留言给我吧!
bm
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:437 积分:3463 威望:0 精华:0 注册:2011/9/13 23:27:00
谢谢狐狸爸爸  发帖心情 Post By:2011/10/25 13:07:00 [只看该作者]

谢谢狐狸爸爸可以了。

 回到顶部
帅哥哟,离线,有人找我吗?
czy
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33945 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2011/10/25 13:07:00 [只看该作者]

昨天不是给你整过一个吗?

 

RibbonTabs("工作").Groups("工作组").Items("标签2").Text = "星期" & "日一二三四五六".Chars(Today.DayOfWeek)

[此贴子已经被作者于2011-10-25 13:08:21编辑过]

 回到顶部