Foxtable(狐表)用户栏目专家坐堂 → [求助]获取上月的函数有吗


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

主题:[求助]获取上月的函数有吗

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/1/19 9:36:00 [显示全部帖子]

Dim y As Integer = Date.Today.Year
Dim m As Integer = Date.Today.Month
Dim dt1 As New Date(y, m, 1)
dt1 = dt1.AddMonths(1)
Tables("订单").Filter = " 交期 >= #" & dt1 & "# and 交期 < #" & dt1.AddMonths(1) & "# and 货款_已收 = False "

 回到顶部