以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  2月29日  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=153354)

--  作者:杨耀生
--  发布时间:2020/8/8 10:35:00
--  2月29日
请教大侠,如何设置列属性或其它办法,让2月29日在平年不出现该列而闰年出现该列。


--  作者:有点蓝
--  发布时间:2020/8/8 10:53:00
--  
判断年份,如果被4整除就可以添加29日

dim y as integer = date.today.year
if y mod 4 = 0 then
msgbox("闰年")
end if

--  作者:杨耀生
--  发布时间:2020/8/9 1:03:00
--  
这个代码放在何处执行?
--  作者:有点蓝
--  发布时间:2020/8/9 20:24:00
--  
比如项目属性afteropenproject事件