专家坐堂-[求助]这个表达式应该怎么改Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

请教下这个表达式应该怎么改

Dim ks As WinForm.DateTimePicker = e.Form.Controls("工厂进度开始日期")

Dim js As WinForm.DateTimePicker = e.Form.Controls("工厂进度结束日期")

Dim ks1 As Date = ks.Value

Dim js1 As Date = js.Value

Dim bd1 As New SQLGroupTableBuilder("进度统计表","无损_检验批")

bd1.C

Dim dt1 As fxDataSource

bd1.Groups.AddDef("检验批编号")

bd1.Groups.AddDef("工程名称")

bd1.Groups.AddDef("检验批")

bd1.Totals.AddDef("重量")

bd1.Filter = "检测日期_最早检测日期 >= #"& ks1 &"# and 检测日期_最后检测日期 <= #"& js1 &"# "

dt1 = bd1.BuildDataSource()

Tables("无损查询表_Table1").DataSource = dt1