以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  周筛选  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=54851)

--  作者:yangwenghd
--  发布时间:2014/8/6 10:29:00
--  周筛选
问问兄弟们在日期列里面筛选周, 筛选出的是星期一到日期天,不是星期天到星期六啊!
感谢 感谢 
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20140806102423.jpg
图片点击可在新窗口打开查看

--  作者:Bin
--  发布时间:2014/8/6 10:31:00
--  
你指的是什么? 菜单并没有本周筛选这个按钮啊?

自己设计的你喜欢怎么来不可以?

--  作者:yangwenghd
--  发布时间:2014/8/6 11:11:00
--  
嗯 谢谢你  列的同时段那个周的范围可以改变吗?感谢 感谢 
--  作者:有点甜
--  发布时间:2014/8/6 11:19:00
--  
以下是引用yangwenghd在2014-8-6 11:11:00的发言:
嗯 谢谢你  列的同时段那个周的范围可以改变吗?感谢 感谢 

 

不可以改,如果要改,就要改对应按钮或菜单的具体代码。


--  作者:yangwenghd
--  发布时间:2014/8/6 11:45:00
--  
 好的 谢谢你哦 
--  作者:yangwenghd
--  发布时间:2014/8/6 12:33:00
--  
Dim w As Integer = d1.DayOfWeek \'算出今天是星期几
    Dim dt1 As Date = d1.AddDays(-w) \'获取本周的第一天
    Dim dt2 As Date = d1.AddDays(6 - w) \'获取本周的最后一天

里面的“W”是不是今天的意思啊
如果改成和系统的同时段里面的周一样一个是改为(-1W)和(7 - W)  吗?
感谢 感谢 

--  作者:有点甜
--  发布时间:2014/8/6 14:31:00
--  
 回复6楼,上面的代码,就是计算从星期天到星期六的啊
--  作者:yangwenghd
--  发布时间:2014/8/6 15:12:00
--  
嗯 感谢 该一下w那几个参数就可以了哈!感谢