[已解决]取得某月天数报错

mqr66

我现在学习function函数，在标准模块里增加了如下代码 ，用于取得某月的天数，但是取得的天数都是30天，比如说8月应该是31天，但用此方法取得的天数也是30天，2月用此方法取得的天数也是30天，不知道自己错那儿了，请高手指教，谢谢了。
Function tianshu(riqi As Date) As Byte '求某月天数
tianshu = DateSerial(Year(riqi), Month(riqi) + 1, Day(riqi)) - riqi
'dateserial函数用来取得当前日期加1个月份的日期，再减去当前日期就等于该月的天数
End Function

最佳答案

月排行榜 / 总排行榜

mxg825

2011-10-29 19:16

Function tianshu(riqi As Date) As Byte '求某月天数
tianshu = Day(DateSerial(Year(riqi), Month(riqi) + 1, 0))
'dateserial函数用来取得当前日期加1个月份的O天=当前日期的最后一天！再用DAY 取天数
End Function

跳转到最佳答案楼层

mxg825

Function tianshu(riqi As Date) As Byte '求某月天数
tianshu = Day(DateSerial(Year(riqi), Month(riqi) + 1, 0))
'dateserial函数用来取得当前日期加1个月份的O天=当前日期的最后一天！再用DAY 取天数
End Function

爱疯

看错了，回错地方了

爱疯

看错了，回错地方了

mqr66

回复 爱疯 的帖子

爱疯版主前面说的加引号，是初步解决问题了。但后面减法和除法的事没有看明白，能否说得详细一点。