Foxtable(狐表)用户栏目专家坐堂 → [求助]筛选


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

主题:[求助]筛选

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


加好友 发短信
等级:超级版主 帖子:106129 积分:539756 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/4/19 8:27:00 [显示全部帖子]


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


加好友 发短信
等级:超级版主 帖子:106129 积分:539756 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/4/20 8:27:00 [显示全部帖子]

方法1、把按钮的代码复制到DateTimePicker1控件的事件中

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


加好友 发短信
等级:超级版主 帖子:106129 积分:539756 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/4/20 9:01:00 [显示全部帖子]

放到日期控件valuechanged事件

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


加好友 发短信
等级:超级版主 帖子:106129 积分:539756 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/4/20 9:49:00 [显示全部帖子]

Dim v  As Date = e.Form.Controls("DateTimePicker1").value
Dim y As Integer = v.Year
Dim m As Integer = v.Month
Dim FirstDay As Date = New Date(y, m, 1)
Dim LastDay As Date = New Date(y, m, Date.DaysInMonth(y,m))

Tables("表A").Filter  = "日期 >= #" & FirstDay & "# and 日期 <= #" & LastDay & "#"


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


加好友 发短信
等级:超级版主 帖子:106129 积分:539756 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/4/21 9:18:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:根据日期筛选 (2).zip


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


加好友 发短信
等级:超级版主 帖子:106129 积分:539756 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/4/21 11:26:00 [显示全部帖子]


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


加好友 发短信
等级:超级版主 帖子:106129 积分:539756 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/3/28 16:15:00 [显示全部帖子]


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


加好友 发短信
等级:超级版主 帖子:106129 积分:539756 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/7/18 16:14:00 [显示全部帖子]

先看3遍:http://www.foxtable.com/webhelp/topics/1284.htm

b.Filter = "[是否开piao] = '开piao' and [未收运费] <> 0" 

 回到顶部
总数 29 上一页 1 2 3