以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]根据年份加截业务员的数据  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=160224)

--  作者:xuxd76
--  发布时间:2021/1/25 12:34:00
--  [求助]根据年份加截业务员的数据
年份:
业务员:

同时满足年份与业务员两个条件,按CLICK时显示数据
年份与业务员都是可以选择的,不是固定写死在代码中的,如何实现?
求大神指教!

Dim y As Integer = 2011 \'指定年份
Dim
dt1 As New Date(y, 1, 1)
Dim
dt2 As New Date(y, 12, 31)
Dim
Filter As String
Filter
= "日期 >= #" & dt1 & "# And 日期 <= #" & dt2 & "#"
DataTables
("订单").LoadFilter = Filter
DataTables
("订单").Load()


--  作者:有点蓝
--  发布时间:2021/1/25 13:32:00
--  
参考:http://www.foxtable.com/webhelp/topics/1058.htm
--  作者:xuxd76
--  发布时间:2021/1/25 14:23:00
--  
感谢蓝版