返回列表 上一主題 發帖

每年的第一個星期六

回復 1# myleoyes

比較長,試試看
  1. DateAdd("d", 7 - WeekDay(DateSerial(Year(date), 1, 1)) + IIf(7 - WeekDay(DateSerial(Year(Now()), 1, 1)) >= 0, 0, 7), DateSerial(Year(date), 1, 1))
複製代碼
7 - WeekDay... 的7的意思為星期6
6 - WeekDay... 的話是星期5, 如此類推
5 為星期4
4 為星期3
3 為星期2
2 為星期1
1 為星期日
懂得發問,答案就會在其中

今日の一秒は  明日にない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

        靜思自在 : 信心、毅力、勇氣三者具備,則天下沒有做不成的事。
返回列表 上一主題