Office中国论坛/Access中国论坛

标题: 计算一周起止日期之简要方法 [打印本页]

作者: todaynew 时间: 2009-3-10 16:01
标题: 计算一周起止日期之简要方法
[attach]36502[/attach]

[attach]36503[/attach]

Me.周一.Value = DateAdd("d", 1 - Format(Me.日期.Value, "w", vbMonday), Me.日期.Value)
Me.周日.Value = DateAdd("d", 7 - Format(Me.日期.Value, "w", vbMonday), Me.日期.Value)

作者: ACMAIN_CHM 时间: 2009-3-10 20:12
踹上一脚

******************
* 一切皆有可能 *
******************
.
ACMAIN - Access论坛回贴准则（个人）.
.
同一贴子不回复第二次
.
QQ群 48866293 / 12035577 / 7440532 / 13666209
http://forum.csdn.net/BList/OtherDatabase .
http://www.accessbbs.cn/bbs/index.php .
http://www.accessoft.com/bbs/index.asp .
http://www.access-programmers.co.uk/forums .
http://www.office-cn.net .
.
http://www.office-cn.net/home/space.php?uid=141646 .

作者: todaynew 时间: 2009-3-10 20:13

踹上一脚

******************
* 一切皆有可能 *
******************
.
ACMAIN - A ...
ACMAIN_CHM 发表于 2009-3-10 20:12

去看《团剧》，马上开始了。

作者: yanwei82123300 时间: 2009-7-30 10:10
THANK YOU SHARING IT

作者: goto2008 时间: 2009-7-30 10:24

学习

作者: wufeng980114 时间: 2009-12-31 21:18
谢谢，好DD

作者: li08hua 时间: 2010-4-29 01:35
学习中

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)