主题：求助

老师们，帮我修改下？

 

关于日期我希望是通过2个时间控件来录入

可是总是报错，无论我用不用cdate转换，

窗口的afterload：

Dim st As WinForm.DateTimePicker = e.Form.Controls("STime")
st.value = Date.Today()
Dim et As WinForm.DateTimePicker = e.Form.Controls("ETime")
et.value = Date.Today()

 

 

统计按钮代码一部分

Dim st As Date = e.Form.Controls("STime").value
Dim et As Date = e.Form.Controls("ETime").value
Dim bd1 As New SQLGroupTableBuilder("统计表1","入库")
bd1.C
Dim dt1 As fxDataSource
bd1.Groups.AddDef("品番")
bd1.Groups.AddDef("库位")
bd1.Totals.AddDef("数量","入库_数量") '对数量进行统计
bd1.filter = "{入库}.日期 >= 'cdate(st)' And {入库}.日期 <= 'cdate(et)'"
dt1 = bd1.BuildDataSource()

报错截图

此主题相关图片如下：1241512.jpg

bd1.filter = "{入库}.日期 >= #" & cdate(st) & "# And {入库}.日期 <= #" & cdate(et) & "#"

谢谢，不过得把“#”换成“‘”