- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 判断周以内的数据？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83835)
-- 发布时间：2016/4/18 13:01:00
-- 判断周以内的数据？
判断周以内的数据？
我有一个表，一个窗口，窗口中两上副本表，都是绑定“表A”，副本一表按“周”汇总，我想通过点击副本表一中单元格后，将副本表一中选中的单元格所在的“周”的数据在副本表二中显示
此主题相关图片如下：qq截图20160418125052.jpg
此主题相关图片如下：qq截图20160418125052.jpg-- 发布时间：2016/4/18 13:03:00
--
求老师指点知识点或代码？
-- 发布时间：2016/4/18 14:02:00
--
求指占?
-- 发布时间：2016/4/18 14:15:00
--
上传实例
-- 发布时间：2016/4/18 14:40:00
--
案例发上来了，老师！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:判断周的数据.table |
-- 发布时间：2016/4/18 15:32:00
--
Dim d As Date = e.Row("第一列")
Dim y As Integer = d.Year
Dim w As Integer = d.DayOfWeek \'算出今天是星期几
If w = 0 Then w = 7
Dim dt1 As Date = d.AddDays(-w+1) \'获取本周的第一天
Dim dt2 As Date = d.AddDays(7 - w) \'获取本周的最后一天
Tables("窗口1_Table2").Filter = "(性质 = \'月计划\' or 性质 = \'周计划\') and 第一列 >= #" & dt1 & "# And 第一列 <= #" & dt2 & "#"