主题：时间条件设置错误

老师好！

我的时间条件被提示有错。可是，我没搞明白呀！请老师给予指引！谢谢！

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

Filter = "单据日期 >= #" & dt8 & "# And 单据日期 <= #" & dt9 & "#"