以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 日期值 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69136) |
|
-- 作者:zsslly -- 发布时间:2015/5/31 14:01:00 -- 日期值 窗口中有一个textbox,我想得到当前日的结果为:比如是 15年5月31日星期天 代码怎么写?
|
|
-- 作者:大红袍 -- 发布时间:2015/5/31 14:15:00 -- msgbox(Format(Date.Today, "yy年MM月dd日dddd")) |
|
-- 作者:大红袍 -- 发布时间:2015/5/31 14:16:00 -- e.Form.Controls("TextBox1").Text = Format(Date.Today, "yy年MM月dd日dddd")) |
|
-- 作者:zsslly -- 发布时间:2015/5/31 14:24:00 --
|
|
-- 作者:zsslly -- 发布时间:2015/5/31 14:25:00 -- 多了一个括孤 |
|
-- 作者:zsslly -- 发布时间:2015/5/31 14:28:00 -- 老师,
|
|
-- 作者:大红袍 -- 发布时间:2015/5/31 14:36:00 -- e.Form.Controls("TextBox1").Text = Format(Date.Today, "yy年MM月dd日dddd") e.Form.Controls("TextBox2").Text = Format(Date.Today.AddDays(1), "yy年MM月dd日dddd") e.Form.Controls("TextBox3").Text = Format(Date.Today.AddDays(2), "yy年MM月dd日dddd") |
|
-- 作者:zsslly -- 发布时间:2015/5/31 14:41:00 -- 老师,AddDays是增加一天,如果减少一天是什么呢? |
|
-- 作者:大红袍 -- 发布时间:2015/5/31 14:42:00 -- e.Form.Controls("TextBox3").Text = Format(Date.Today.AddDays(-1), "yy年MM月dd日dddd")
http://www.foxtable.com/help/topics/1337.htm
|
|
-- 作者:zsslly -- 发布时间:2015/5/31 14:45:00 -- 谢谢老师 |