常用SQL语句日期获取函数

时间:2021年4月14日浏览:次

function getlastEndday(tDate)'获得上月最后一天
dim dt1,dt2
dt1 = CDate(Year(tDate) & "-" & Month(tDate) & "-1")'得到本月第一天
getlastEndday = DateAdd("d",-1,dt1) ' 得到下个月第一天
end function

function getNextFirstday(tDate)'获得下月第一天
dim dt1,dt2
dt1 = CDate(Year(tDate) & "-" & Month(tDate) & "-1")'得到本月第一天
getNextFirstday = DateAdd("m",1,dt1) ' 得到下个月第一天
end function

function getlastlastEndday(tDate)'获得上上月最后一天
dim dt1,dt2
dt1 = CDate(Year(tDate) & "-" & Month(tDate) & "-1")'得到本月第一天
getlastlastEndday = getlastEndday(DateAdd("m",-1,dt1))
end function

function getlastFirstday(tDate)'获得上月第一天
dim dt1,dt2
dt1 = CDate(Year(tDate) & "-" & Month(tDate) & "-1")'得到本月第一天
getlastFirstday = DateAdd("m",-1,dt1) '获得上月第一天
end function

function getthisFirstday(tDate)'获得本月第一天
getthisFirstday = CDate(Year(tDate) & "-" & Month(tDate) & "-1")'得到本月第一天
end function