| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 菜单中的变量 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=13735) |
| -- 作者：bm -- 发布时间：2011/10/25 13:00:00 -- 菜单中的变量 Dim d As Date = Date.Today 这个代码怎样转换才能显示是 星期 二（中文） |
| -- 作者：狐狸爸爸 -- 发布时间：2011/10/25 13:04:00 -- RibbonTabs("工作").Groups("工作组").Items("标签2").Text = Format(Date.Today,"dddd") |
| -- 作者：bm -- 发布时间：2011/10/25 13:07:00 -- 谢谢狐狸爸爸 谢谢狐狸爸爸可以了。 |
| -- 作者：czy -- 发布时间：2011/10/25 13:07:00 -- 昨天不是给你整过一个吗？
RibbonTabs("工作").Groups("工作组").Items("标签2").Text = "星期" & "日一二三四五六".Chars(Today.DayOfWeek) [此贴子已经被作者于2011-10-25 13:08:21编辑过]
|