以文本方式查看主题

-  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()



此主题相关图片如下:时间条件提示有错.png
按此在新窗口浏览图片


--  作者:大红袍
--  发布时间:2015/8/17 11:07:00
--  
Filter = "单据日期 >= #" & dt8 & "# And 单据日期 <= #" & dt9 & "#"