Foxtable(狐表)用户栏目专家坐堂 → [求助]如何在1月时获取为12月的参数?


  共有3065人关注过本帖树形打印复制链接

主题:[求助]如何在1月时获取为12月的参数?

帅哥哟,离线,有人找我吗?
a87918021
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:290 积分:2317 威望:0 精华:0 注册:2013/11/29 16:59:00
[求助]如何在1月时获取为12月的参数?  发帖心情 Post By:2015/1/12 21:40:00 [显示全部帖子]

Dim y As Integer = Date.Today.Year
Dim m As Integer = Date.Today.Month - 1     '如何在1月时获取为12月的参数?
Dim d1 As New Date(y,m,1)
Dim d2 As New Date(y,m,Date.DaysInMonth(y,m)) '获取本月的最后一天

 回到顶部