Foxtable(狐表)用户栏目专家坐堂 → [求助]关于日期判断


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

主题:[求助]关于日期判断

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


加好友 发短信
等级:幼狐 帖子:62 积分:703 威望:0 精华:0 注册:2016/5/15 16:39:00
[求助]关于日期判断  发帖心情 Post By:2016/7/11 21:03:00 [显示全部帖子]

我想判断tables("订单")rows("日期")

 

是否在本月内,这个代码怎么写


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


加好友 发短信
等级:幼狐 帖子:62 积分:703 威望:0 精华:0 注册:2016/5/15 16:39:00
  发帖心情 Post By:2016/7/11 21:06:00 [显示全部帖子]

Dim yue As Date = Date.now()
Dim a As Integer = Date.now().Year
Dim b As Integer = Date.now().Month
Dim Days As Integer = Date.DaysInMonth(a,b)
Dim kaishi As Date = new Date(a,b,1)
Dim jieshu As Date = new Date(a,b,days)

If tables("订单")rows("日期") >= #" & kaishi & "#  and  tables("订单")rows("日期") <= #" & jieshu & "#  then

 

 

 

这样写对吗

 

 

 


 回到顶部