以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 时间条件设置错误 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=73319) |
-- 作者:sbfqpidt -- 发布时间:2015/8/17 11:06:00 -- 时间条件设置错误 老师好! 我的时间条件被提示有错。可是,我没搞明白呀!请老师给予指引!谢谢! Dim y As Integer = Date.Today.Year Dim m As Integer = Date.Today.Month Dim dt8 As New Date(y, m, 1) Dim dt9 As New Date(y, m, Date.DaysInMonth(y, m)) \'获取本月的最后一天 Dim Filter As String Filter = "单据日期 >= #" & dt8 & "#"
And "单据日期 <= #"
& dt9 & "#"。。。。。。。。问题出在这儿。
Dim bt4 As New SQLCrossTableBuilder("统计表4", "销售明细") bt4.Cfont-size: 9pt; font-family: 宋体;">基础" Dim dt4 As fxDataSource bt4.HGroups.AddDef("客户编号") bt4.VGroups.AddDef("单据类型") bt4.Totals.AddDef("销售金额")\',"n") bt4.Filter = Filter dt4 = bt4.BuildDataSource() bt4.Build() |
-- 作者:大红袍 -- 发布时间:2015/8/17 11:07:00 -- Filter = "单据日期 >= #" & dt8 & "# And 单据日期 <= #" & dt9 & "#" |