以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助:加个筛选条件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=34108)

--  作者:baixiaobai
--  发布时间:2013/5/30 19:45:00
--  求助:加个筛选条件
Tables("主窗口_table1").Filter= "离店日 = \'" & Date.Today() & "\' 
Dim Sum2 As Double = Tables("主窗口_table1").Compute("Sum(押金收)")
Forms("主窗口").Controls("TopicBar1").Pages(0).Links(2).text = "今日应退押金 " & sum2 & " 元"

求助:我想再上面再加个条件,不会写哦,那位大侠帮忙写下!!!

条件是:从主窗口_table5 中的(分店)列搜索出 "北京" 然后,在主窗口_table1中查询,北京店离店日是今天的行,再统计出今天北京店一共应该退出多少押金.

--  作者:狐狸爸爸
--  发布时间:2013/5/30 19:59:00
--  
Tables("主窗口_table1").Filter= "离店日 = #" & Date.Today() & "# And 分店 = \'北京\'"