Foxtable(狐表)用户栏目专家坐堂 → 获得前三个月所在月的第一天


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

主题:获得前三个月所在月的第一天

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


加好友 发短信
等级:幼狐 帖子:76 积分:735 威望:0 精华:0 注册:2020/12/20 14:02:00
获得前三个月所在月的第一天  发帖心情 Post By:2021/5/17 11:51:00 [显示全部帖子]

老师,我要计算前三个月的产品月均销量以便与库存做对比,已知取本月第一天和最后一天的方法,请您指教一下,如果我要得到前三个月的第一天的数据怎么写代码?

Dim d As Date = e.Form.Controls("DateTimePicker1").value
Dim y As Integer = d.Year
Dim m As Integer = d.Month
Dim Days As Integer = Date.DaysInMonth(y,m)
Dim FD As Date = New Date(y,m,1) '获得该月的第一天
Dim LD As Date = New Date(y,m,Days) '获得该月的最后一天

如果e.Form.Controls("DateTimePicker1").value=2021-05-05
我要得到3月份第一天,代码如何写,您受累给指导下

 回到顶部
帅哥哟,离线,有人找我吗?
18920118515
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:76 积分:735 威望:0 精华:0 注册:2020/12/20 14:02:00
  发帖心情 Post By:2021/5/17 12:01:00 [显示全部帖子]

谢谢老师


 回到顶部